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WE KNOW YOU'RE ANXIOUS TO LEARN ALL ABOUT THE GRAPHIC SYSTEM, BUT... 


you'll miss valuable information if you don't start at the beginning! 

No matter what your objectives are, you should begin by reading the 
introduction in the Graphic System Operator's Manual. It presents an 
overview of the complete Graphic System documentation package, and 
it will help you select the study material you need to use the Graphic 
System effectively. 
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INTRODUCTION 
MATERIAL COVERED 


The major part of this manual discusses how to use the Graphic System to make graphs of 
data and functions. Some additional data, covering graph enhancements, drawn pictures and 
three-dimensional transformations, is also included. The material covered is appropriate for 

a person with no experience in graphic programming and only a brief introduction to BASIC. 


The programs shown are intended to be easily understood examples. Many of them can be 
made smaller, faster or otherwise better. Each example program is not presented as the best 


way to perform a given task, only as a way which is easy to understand. 


Although this manual can be used as a quick reference guide, it is primarily written to be 
‘nstructional. Each section assumes that all preceding sections have been read. 
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INTRODUCTION 


GRAPH NOMENCLATURE 


Below is a typical graph which includes many features of a complete graph. The data curve 
itself, although very important, is among the simpler components. Second in importance 
are the axes and the tic marks which can be added. Major tic marks can be extended to be- 
come a grid system; minor tic marks can be added to improve clarity. 


The remaining additions all involve characters, either letters or numbers. 


The tic marks can be labeled. Labels on each axis indicate the meaning of the tic labels. The 
entire graph can be titled as shown. 


TITLE 


— 


TIC MARKS 


DATA CURVE 


2 


TIC MARK LABELS 





AXIS LABELS 
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INTRODUCTION 


EXAMPLE 


The following is an example to illustrate how Graphic System statements are used to make 
a simple graph. (The auto line number feature makes entering the program much easier.) 


10@ INIT 

118 WINDOW -108, 196, -106, 188 
126 AXIS 28,26 

13@ MOVE -88,-23 

148 FOR I#-88 TO 88 

130 ORAW I,SINCI/3)81 

160 NEXT ! 

17@ END 
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GRAPHIC STATEMENTS 


MOVE AND DRAW 


The fundamenta! building block of drawn information is the line, just as the fundamental 
building block of written information is the letter. To draw a line on a piece of paper, the 
pen is first moved to the line’s starting point. The pen is placed on the paper and the line is 
drawn to the endpoint. Drawing a /ine on the Graphic System (GS) is the same process. The 
first step is to move to the line’s starting point. The second step is to draw to the line’s end- 
point. 


DRAW TO FINISH POINT 


MOVE TO STARTING POINT 


The Graphic System commands for these tasks are MOVE and DRAW. 


[ Line number | MOVE [ |/O address | X coordinate in user data units , Y coordinate 


in user data units 





When drawing a line (sometime called a vector} on the GS, the starting and ending points of 
the line must be specified. A point on the display is located by specifying a horizontal posi- 
tion and a vertical position. As a result, each MOVE and DRAW command has two arguments: 
one for the horizontal position and one for the vertical position. By convention, the argu- 
ment specifying the horizontal position is the first of the pair, and the argument specifying 
the vertica! position is the second. 
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GRAPHIC STATEMENTS 


MOVE AND DRAW 


: 

! 

VERTICAL 
: POSITION 
| 

| 





|~—____+ 


HORIZONTAL POSITION 


The arguments of the MOVE and DRAW commands can be any of the following: 


NUMERIC CONSTANT Examples: Leo 
- 9889 
6025.45 
-1.34E267 
VARIABLE Examples: i 
2(68) 
EXPRESSION Examples: 


A+} 
-R+B8¢ (COS (G) UD ET) 


MOVE and DRAW alter the position of the GRAPHIC POINT. The position of the graphic 
point is analogous to the position of a pen on a piotter. When no program is running, the 
graphic point’s position is shown by the blinking rectangular cursor. 


1 -2 Pilot 50: Graphic Prag 


GRAPHIC STATEMENTS 


WINDOW 


The WINDOW command defines the limits of the data space that the Graphic System display 
is “looking at’. The person using the GS defines what these data limits are. For this reason, 
the units in the MOVE, DRAW, and WINDOW commands are called USER DATA UNITS 

in this manual. Similarly, the limits defined in the WINDOW command form what is called 

a USER DATA SPACE. 


Before a graph is drawn on a sheet of paper, the paper must be marked off, both horizontally 
and vertically, into units appropriate for the information to be graphed. For instance, the 
same piece of graph paper can be used to show the progress of a glacier moving a few centi- 
meters per year or a jet aircraft moving many kilometers per second. Before a graph is drawn 
on the display of the GS, the same marking process must be done. The WINDOW command 
accomplishes this. 


[ Line number | WINDOW minimum horizontal (X) value in user data units , maximum 


horizontal (X) value in user data units , minimum vertical (Y¥} value in 


user data units , maximum vertical (Y) value in user data units 





The WINDOW command tells the GS what data values mark the boundaries of the display. 
For example, the graph program in the Introduction included the following statement: 


ft 


WIMNDGW -2@,20,-1,1 


The WINDOW command tells the GS how to interpret the values specified in the MOVE and 
DRAW commands. After the above WINDOW command is executed, a MOVE —20,-1 
command will place the graphic point at the lower left corner of the display, a MOVE 20,1 
command will place the graphic point in the upper right corner of the display, and a MOVE 
0,0 command will place the graphic point in the exact middle of the display. WINDOW al- 
ways requires four arguments, just as MOVE and DRAW always require two arguments. 
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GRAPHIC STATEMENTS 


WINDOW 


As with MOVE and DRAW commands, the WINDOW arguments can be constants, variables, 
or expressions. There is no limit to the values these arguments can be, other than the numeric 
limits of the GS itself. 


For example, here is a valid WINDOW command: 


a re 


WINDOW 1965, 1975,4,8,8.5 


{This WINDOW command might be defining years on the horizontal axis and interest rates 
on the vertical axis.) 


After this command is executed, placing the graphic point at the lower left corner of the 
display requires a MOVE 1965, 4.8. Here is another valid WINDOW command: 


in, gee 


WINDOW -1E3@0, 1E30@,-1&-3@8, 1E-360 
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GRAPHIC STATEMENTS 


WINDOW 


After this command is executed, placing the graphic point at the lower left corner of the 
display requires a MOVE —1E+300,—1E—300. The horizontal data minimum (the first 
argument of the WINDOW command) must always be less than the horizontal data maxi- 
mum {the second argument). The vertical data minimum (the third argument) must always 
be less than the vertical data maximum (the fourth argument). 


The WINDOW command also tells the GS how to interpret the arguments of MOVE and 
DRAW commands. How does the System interpret these arguments when no WINDOW 
command has been executed, such as when it is first turned on? To handle this situation, 
the GS establishes default window limits as shown below. 


— 100 


0 130 


Whenever it is turned on, the System ijn effect executes the following command: 
WINDOW G,120,0, 168 


(The origin of these numbers is discussed later in this section.} These default window limits 
are also defined whenever any of the following commands are executed: 


INIT 
OLD 


DELETE ALL 
WINDOW timits which differ from these default values are usually desired. A WINDOW 
command defining the desired limits must be executed after any of the following events 
Occur: 


— The GS is turned on 
— Any of these commands are executed: 


INIT 
OLD 
DELETE ALL 
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GRAPHIC STATEMENTS 


WINDOW 


The example program shown below will illustrate some of these concepts. After pressing 
the PAGE key, enter the following statements into the GS: 


DELETE ALL 

180 PAGE 

116 INIT 

12@ MOVE 6,8 

138 DRAW 138,108 
140 HOME 

158 END 


RUN 
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GRAPHIC STATEMENTS 


WINDOW 


The GS will erase its display and then draw a line from the lower left corner to the upper 
right corner. The actual positioning of the graphic point during execution of this program 
can be observed by entering GOTO 100 into the System and then repeatedly pressing the 
“STEP PROGRAM” key. (This technique is useful for finding errors in complex programs.) 


A series of example programs will now demonstrate how WINDOW affects the display. First 
press the PAGE key (this clears the display and places the cursor in the upper left corner, 
allowing space for the program to be entered). Now enter the following program: 


DELETE ALL 

INIT 

188 PAGE 

119 MOVE 35,28 

128 DRAW 35,938 

a “eet Ss oe This program draws a square box centered on the screen. 
150 DRAW 35,26 

168 HOME 

178 END 


RUN 
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GRAPHIC STATEMENTS 


WINDOW 


Now enter the following: 


WINDOW -70, 208, -30, 158 
RUN 


The result is a square box with each edge measuring half the length of the one previously on 
the screen. It is half size because the WINDOW statement defined the edges of the user data 
space to be twice as far apart as they were at the default values. The window defined by the 
above WINDOW statement extends from —/0 to 200 user data units on the horizontal axis 
and from —50 to +150 user data units on the vertical axis. So the screen is, in effect, looking 
at four times as much area. 
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GRAPHIC STATEMENTS 


WINDOW 


With the WINDOW statement, the display can be told to “‘look at’’ any rectangular area in 
user data space. Enter the commands shown below: 


WINDOW -588, 699,20, 189 
RUN 


This produces a box the same height as the first box but very narrow. This occurs because 
the last WINDOW statement defined the data space the screen is ““!ooking at” to be 1100 
user data units wide, almost ten times wider than the width implied on the default value. 
Thus, the box looks very narrow even though its width in data units has not been changed. 
Note that the height is unchanged from the first time it was displayed because neither the 
box height in user data units nor the window height in user data units is different in this 
example. This demonstrates how to change the horizontal and vertical arguments in the 
WINDOW statement independently. They are totally independent. 


1-9 
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GRAPHIC STATEMENTS 


VIEWPORT 


1-10 


When a graph is drawn on a piece of graph paper, it is not always appropriate for the graph 
to totally fill the paper on which it is drawn. There are times when space is needed around 
the edges for labeling or titling. In other situations more than one graph is to be drawn ona 
single piece of paper. These same situations can arise when drawing graphs on the Graphic 
System. The command used to handle them is VIEWPORT. 


[ Line number | VIEWPORT minimum horizontal value in GDU’s , maximum 


horizontal value in GDU’s , minimum vertical value in GDU’s , 


maximum vertical value in GDU’s 





The VIEWPORT command is used to specify the size and location of an image on the GS 
display (and any other graphic device in the 4050 family). In the VIEWPORT command, the 
display of the GS is considered to be a rectangle 130 units wide by 100 units high. 


—— 100 


0 136 


These units are called GRAPHIC DISPLAY UNITS. Unlike user units, Graphic Display 
Units (GDU’s) are fixed for a given device and never change. A horizontal GDU on the dis- 
play represents the same distance as a vertical GDU on the display. GDU’s are used in the 
VIEWPORT command to specify the size and position of a graph or image on the display 
of the GS. As with MOVE, DRAW, and WINDOW, the arguments of VIEWPORT may be 
constants, variables, or expressions. However, the arguments of the VIEWPORT command 
are interpreted as being GDU’s. All four arguments refer to the actual limits for graphic in- 
formation on the display. The GS will draw no lines outside these limits. The first argument 
is the location on the display of the /eft-most limit for graphic information. The GS will 
draw no lines to the left of this location. 
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GRAPHIC STATEMENTS 


VIEWPORT 


The second argument is the right-most limit. The third argument is the lower limit. The 
fourth argument is the upper limit. To specify that an image occupy the whole display, a 
VEEWPORT command with the arguments shown below is executed: 


VIEWPORT @,130,8, 108 


To specify that an image is to occupy only the jower left corner of the display, a VIEW- 
PORT command with the arguments shown below is executed: 


VIEWPORT 8,65,8,50 


— 0 


Just as there are default values for the WINDOW command, there are default values for the 
VIEWPORT command. The default size for an image is the full display. Whenever the GS is 
turned on, it in effect executes the following command: 


VIEWPORT 6,136,8, 168 


This default viewport size ts also defined whenever any of the following commands are 
executed: 


INTT 
OLD 
DELETE ALL 
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GRAPHIC STATEMENTS 


VIEWPORT 


1-12 


a 


For this reason, all examples so far in this section have referenced the whole display. They 
have been run as if a VIEWPORT 0,130,0,100 command had been previously executed. 
(The default WINDOW limits are 0,130,0,100. This defines a one-to-one correspondence 
between GDU’s and user data units when the GS is first turned on.) 


lf a viewport Is desired which is different from the default size, a VIEWPORT command 
defining the desired size must be executed after any of the following events occur: 


— The GS is turned on 


— Any of these commands are executed: 


INIT 
OLB 
DELETE ALL 


For the next two examples, the square box program listed below should be in the GS 
memory. (Pressing the PAGE key and entering a LIST command will confirm if it is.) 


i8@ PAGE 
118 MOVE 25.28 
128 DRAW 35,88 
138 DRAW 95.88 
196 DRAW $5.28 
138 DRAW 32.28 
i6@ HONE 
1?@ END 


After pressing the PAGE key, enter the following: 


INIT 
RUN 


The square box should now appear centered on the display. Now enter the following com- 
mands: 


WINDOW @, 138,08, 186 
VIEWPORT 9,65,8,58 
RUN 


The square box reappears but with a different size and location. The graphic output of this 
program can be examined two ways. One way Is to see what the viewport command has done 
(shown in the diagram below): 
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GRAPHIC STATEMENTS 


~ VIEWPORT 


1-13 


VIEWPORT 8,65,8,58 


What formerly occupied the whole display now occupies only the lower feft corner, as 
specified by the VIEWPORT 0,65,0,50 command, above. 


The left edge of the viewport is still the left edge of the display because the first argument 

is zero {as in the default VIEWPORT 0,130,0,100). However, the right edge of the viewport 
is now only half way across the display because the second argument is 65 GDU’s, half the 
display width of 130 GDU’s. In specifying the vertical size of the viewport, a similar situation 
exists. The bottom of the viewport is still the bottom of the display but the top of the 
viewport is defined to be half way up the display {because the last argument in the above 
VIEWPORT command is 50 GDU’s). 
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GRAPHIC STATEMENTS 


VIEWPORT 


Another way to look at the output of this program is to see how the window has been af- 
fected. This is shown below: 


WINDOW 8,130,8, 188 
The same window as in previous examples is now drawn with a different size and location 
on the display. It is otherwise unchanged. 


As with other GS commands, WINDOW and VIEWPORT are executed immediately if entered 
without a preceding statement number. An entered command becomes part of a stored pro- 
gram if it is entered with a preceding statement number. For example, 


WINDOK @,138.8, 188 


is executed immediately while 


258 WINDOW @, 138,8, 198 


1 ay 4 becomes statement 250 in whatever program is currently in GS memory. ee ee ee 


GRAPHIC STATEMENTS 


WINDOW AND VIEWPORT 


WINDOW and VIEWPORT accomplish conceptually similar tasks. As shown in the diagram 
below, the combination of these two statements allow the selection of what {ts to be seen 


(WINDOW) and where on the display it is to be located (VIEWPORT). The WINDOW com- 


mand manipulates the size and location of the window on the user's data space. Its argu- 
ments are interpreted as user data units. The VIEWPORT command manipulates the actual 
size and location of the image on the display. Its arguments are interpreted as Graphic Dis- 
play Units. WINDOW can be used to “’zoom” in ona particular area of a graph to display 
more detail. VIEWPORT can be used to make several graphs appear on the display at one 
time. 


To repeat: VIEWPORT specifies the physical area on the display to be used for graphic in- 
formation: WINDOW specifies how many units of measure (that is, user data units) will be 


included within this physical graphing area. 


WINDOW DEFINED ON 
USER DATA SPACE (SIZE 
& POSITION DETERMINED 
BY WINDOW STATEMENT 
WITH ARGUMENTS IN 
USER DATA UNITS} 









DISPLAY VIEWPORT (SIZE & POSITION 
DETERMINED BY VIEWPORT STATE- 
MENT WITH ARGUMENTS IN GDU’s) 
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GRAPHIC STATEMENTS 


WINDOW AND VIEWPORT a 


CLIPPING 

These commands (WINDOW and VIEWPORT} also serve another function. As an example, 
try the following. Confirm that the square box program on page 1-7 is in the GS by entering 
the following statements: 


INIT 
RUN 


The square box should again appear on the center of the display. Now enter the following: 


INIT 
WINDOW 65, 136,58, 108 
RUN 


Notice now that because of the changed arguments in the WINDOW statement, only the 

upper right corner of the square appears (although it is filling the display). Because the 
VIEWPORT statement’s arguments are at their default Values (0,130,0,100), this upper right me 
corner fills the display. 
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GRAPHIC STATEMENTS 


WINDOW AND VIEWPORT 


WIN DOW is used to specify what is to be seen and what is not to be seen. Any lines which 
a program attempts to draw outside the data limits specified in the WINDOW command are 
not drawn. Now enter the following: 


VIEWPORT 65; 130,538,168 
RUN 


Preventing any drawing outside a specified WINDOW is called clipping. Only the upper right 
corner of the square appears, located in the upper right quarter of the display. The remainder 
of the square is not drawn because of the clipping capability of the GS. 
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GRAPHIC STATEMENTS 


SCALE 


1-18 


SCALE 


[ Line number | SCALE horizontal scale factor , vertical scale factor 


As shown earlier, the WINDOW statement allows the user to define what portion of the data 
Space is to be seen. The SCALE command is an alternative way to do this. In effect, SCALE 
allows the user to do the same thing that WINDOW does but in a slightly different way. After 
confirming that the box program on page 1-7 is in memory, enter the following: 


INIT 
8Q@ MOVE 8,0 
98 SCALE 2)2 
RUN 
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GRAPHIC STATEMENTS 


SCALE 


The box appears half size in the lower left corner of the screen. Each argument in SCALE is 
interpreted to be the number of user data units which are to be represented by each GDU. 
The detault values for these areguments are SCALE 1,1. SCALE 2,2 indicates that the data 
should appear half the size it would have appeared with the default argument values. This 
also implies that, if the VIEWPORT arguments are unchanged, the same viewport on the dis- 
play should contain four times as much user data space area. 


Enter the following: 


INIT 
88 MOVE 65,58 
9@ SCALE 252 
RUN 
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GRAPHIC STATEMENTS 


SCALE 


1-20 


The square box is drawn in the upper right quadrant of the screen. The only difference in 
these two examples is the MOVE command which preceded the SCALE command. These 
examples demonstrate another function of the SCALE command. SCALE sets the location 
of the point X = O and Y = 0 in user data space to be the current location of the graphic 
point. This sequence of statements: 


INIT 
MOVE 0,8 
SCALE 2,2 


is equivalent to: WINDOW 0,260,0,200. Similarly: 


INIT 
MOVE 65,59 
SCALE 2;2 


is equivalent to: WINDOW —130,130,—100,100. {The INIT commands in the two examples 
are not strictly required but are used to ensure that the first MOVE 0,0 Is actually a move 
to the lower Jeft corner of the display and that the second MOVE 65,50 is actually a move 
to the center of the display.} 


The INIT statement is used in this section to ensure that the examples have been run from a 
common starting point. INIT, in addition to other functions, restores the arguments of the 
WINDOW, SCALE, and VIEWPORT statements to their default values. These are: 


WINDOW @,138,8, 188 
SCALE 1,1 
VIEMPORT G,138,0, 189 


Because of the IN{T command the arguments of the MOVE commands (which immediately 
preceded the SCALE commands in the examples) were all interpreted the same way. 
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GRAPHIC STATEMENTS 


GRAPHIC OUTPUT 


Earlier in this section, the MOVE and DRAW statements were discussed. These statements 
and the other graphic output statements are now covered in somewhat more detail. All 

these statements affect the location of the cursor (also called the graphic point). The location 
of this point is always maintained internally by the GS and, if a program is not running, the 
GS constantly shows the physical location of this point on the screen. The graphic point is 
actually located in the lower left corner of the cursor’s flashing rectangular dot matrix. This 
is the starting point for any graphic output operation. 


PAGE AND HOME 


Two functions useful for cursor housekeeping tasks are PAGE and HOME. These commands 
can be executed either from the keyboard (using the PAGE and HOME key) or under pro- 
gram control (by entering a line number before the words PAGE and HOME). The box pro- 
gram on page 1-7 contains HOME used under program control. 


The PAGE command erases the display and moves the cursor to the “home” position. On 
the display, this is the position of the upper left most character the display is capable of 
printing. The HOME command, in contrast, only moves the cursor to the home position and 
does not erase the display. The HOME position ts fixed. It is not affected by WINDOW, 
VIEWPORT, or SCALE. 


MOVE AND DRAW 


Execute an INiT command and press the PAGE key. The cursor will appear in the display’s 
upper left corner. A DRAW 0,0 will cause a line to be drawn from the current cursor loca- 
tion to the location X = 0 and Y = O in user data units, which, because of the !NIT com- 
mand, is the lower left corner of the screen. The arguments of the DRAW command specify 
the end point of the line. The execution of a DRAW will cause a line to be drawn from 
wherever the graphic point is to the location specified in the DRAW command. The resulting 
line is, of course, subject to the limits imposed by WINDOW. The cursor ts moved from the 
HOME position in the upper jeft corner of the display to the position of the end point of the 
line. Press the PAGE key and enter DRAW 64.5,49.5. 


This will cause a line to be drawn to a location which is approximately in the middle of the 


display. The line ends at the cursor’s lower left corner. The arguments of the DRAW com- 
mand (or any other graphic command) need not be integers. 
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GRAPHIC STATEMENTS 


GRAPHIC OUTPUT 


1-22 


RMOVE AND RDRAW 


There are two types of MOVE and DRAW commands. The type that has been used so far in 
this section is called an “‘absolute’’ MOVE or DRAW command. These commands cause the 
cursor or graphic point to be moved from its present location (wherever that happens to be) 
to the location specified by the command’s arguments (in user data units). 


[ Line number ] RMOVE [ 1/0 address | X increment in user data units , Y 
W 


RDRA 
increment in user data units 





The other type of MOVE and DRAW command is called ‘‘relative’’. RMOVE and RDRAW 
are the relative move and draw commands. Either of these commands will cause the graphic 
point to be moved relative to its present location. That is, the arguments of the RMOVE and 
RDRAW commands are interpreted to be the distances (in user data units) to move away 
from the graphic point’s present location. If the command RDRAW 64.5,49.5 is executed, 

a line is drawn from the current graphic point to a point 64.5 horizontal and 49.5 vertical 
user data units away from the beginning point of the line. 


Enter the following into the machine: 
DELETE ALL 
PAGE 


188 INIT 
14@ MOVE 6.8 


{20 RDRAW 64.5,49.5 
138 RDRAW 64.5,49.5 
148 HOME 

158 END 

RUM 
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Each of the RDRAW commands causes a line to be drawn from the current location of the 
graphic point to a point 64.5 horizontal and 49.5 vertical data units away. 


MOVE and DRAW cause the graphic point or cursor to be moved relative to the origin or 

0,0 point of the user data space. The arguments of these commands are treated as if they 
described an absolute location in user data space. RMOVE and RDRAW cause the graphic 
point or cursor to be moved relative to its current location. The arguments of these commands 
are treated as incremental distances from the current point. Another example illustrates 

these differences. Enter the following into the Graphic System: 
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DELETE ALL 
PAGE 


108 INIT 

118 PAGE 

128 MOVE @,8 
130 DRAW 68,26 
148 MOVE 8,58 
158 RDRAW 66,28 
169 DRAW 68,26 
1?7@ HOME 

188 END 


RUN 


Notice how the command which precedes each of the three DRAW commands affects 
execution. The first DRAW could have been a RDRAW without affecting the shape of the 
drawn pattern. This is because its beginning point is also the origin of the user data space 
coordinate system, that is, the point where X = O and Y = 0. 
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ROTATE 


[ Line number ] ROTATE rotation angle measured in the current trigonometric units 





A command which applies only to RMOVE and RDRAW is ROTATE. This command causes 
each RMOVE and RDRAW to be drawn rotated a specified angle from its expected direction. 
The point around which each RMOVE or RDRAW is rotated is its starting point. For 
example; enter the following commands: 


PAGE 

DELETE ALL 
INIT 

1@@ PaGE 

11@ MOVE 65,58 
128 RDRAW 28,98 
138 HOME 

148 END 

RUH 
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The above program draws a horizontal line 20 data units long with its beginning point 
centered on the display. Now enter the following: 


SET DEGREES 
ROTATE 45 
RUN 


The same RDRAW command is executed, but the resulting line is rotated 45 degrees counter- 
clockwise around its beginning point. The significant feature about this, other than the ro- 
tation, is that the line is rotated around its beginning point. This also happens to be the 
ending point of an absolute MOVE, which was not rotated. The following example demon- 
strates the usefulness of this characteristic: 
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DELETE ALL 

i8@ INIT 

118 SET DEGREES 
PAGE 


138 ROTATE @ 

148 MOVE 65,58 

iS@ REM DRAKA TRIANGLE 
168 RDRAH 4@, 16 

178 RDRAK -48,12 

186 RDRAW 8,-26 

198 HOME 

268 END 
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The display should now show a narrow isosceles triangle “pointed” to the right. Add the 
following statements: 

i32 GOSUB 1486 

134 ROTATE 39 

136 GOSUB 148 

i38 END 

208 RETURN 


RUN 


The triangle has been drawn again but rotated 90 degrees counterclockwise around the 
vertex that corresponds to the endpoint of the MOVE command. This point of rotation can 
be placed anywhere desired. For example, enter the following statement into the GS: 


155 RMOVE ~18,-18 
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Below is a listing of the program as it now !ooks: 


168 INIT 
118 SET DEGREES 
128 PAGE 


138 ROTATE 8 

{32 GOSUB 148 

134 ROTATE 98 

136 GOSUB 148 

{38 END 

148 MOVE 65;:58 
REM DRAW A TRIANGLE 

iSS RMOVE -18,-18 

168 RDRAW 48,19 

178 RDRAW -40; 18 

188 RDORAW 8,-28 


268 RETURN 
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tf the program is run again by entering RUN, the result (shown above) is a triangle oriented 
like the first one in the previous example, ‘‘pointed to the right’, and another triangle. 

This triangle is also oriented at right angles to the first one but the axis of rotation is now 
centered inside both triangles. This effective rotation point is still the end point of an ab- 
solute MOVE command. The reason why the rotation axis changed was that the inserted 
RMOVE command at line 155 shifted the triangle in relation to the end point of the fast ab- 
solute MOVE. This rotation axis can also be determined by the end point of an absolute 
DRAW. 


It should be emphasized again that the ROTATE statement affects only relative moves 
and draws, that is, only the RDRAW and RMOVE commands. Some uses of the ROTATE 
command are discussed later in this manual. 


GRAPHING ARRAYS 


The MOVE, RMOVE, DRAW, and RDRAW commands all have a similar array output cap- 
ability which greatly simplifies outputting a series of connected lines or other large amounts 
of graphic information. If forty lines are to be drawn on the screen, two one-dimensional 
arrays of length 40 are dimensioned as follows: DIM X(40),Y (40). Each successive X and Y 
value is placed in the corresponding array element by using a FOR... NEXT loop or any 
other appropriate process. [n other words, the horizontal location (in user data units) of 
the first point is placed into X(1}, the vertical location of the first point is placed into Y(1) 
and so forth until! the arrays are filled. To draw these lines, all that is necessary is the command 
DRAW X,Y. This command wil! cause a line to be drawn from the current cursor location 
to the X(1),Y(1). From there it draws a line to X(2),Y(2). This continues until both arrays 
are exhausted. The arguments of the DRAW command can be either scales or arrays. The 
command will automatically handle either situation. Of course, both arguments must be 
scalars or both must be arrays. The types cannot be mixed. 


If the variables X and Y are arrays, DRAW X,Y is the equivalent to: 


31@ FOR I= 1 TO 48 
320 DRAW X(T), XCI> 
33@ NEXT | 


This implied output sequence is applicable to DRAW, RORAW, MOVE, and RMOVE. Here 
is an example: 
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PAGE 
DELETE ALL 
188 PAGE 
118 INIT 
126 DIM X(48),7¢(48> 
13@ REM FULL ARRAYS WITH DATA 
146 FOR I=1 TO 48 
13@ X¢1)=1%3.25 
168 YCI>)sSQRCABS< 1-209 %28 
HEXT I 


186 REM MOVE u ace FIRST POINT 
198 MOVE X<1> 

268 REM DRAW’ BOTH ARRAYS 

218 DRAW X;¥ 

220 HOME 

238 END 


RUN 
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Both arrays used must have the same number of elements. If they do not, an error condition 
results. Note also that this alternating output of array elements is different from that of the 
PRINT statement. If the statement PRINT X,Y is executed with the arrays X and Y dimen- 
sioned as above, the sequence of output is as follows: X(1),X(2),X(3), . . . X(39),X (40), 
Y¥(1),Y¥(2},¥(3), . . .Y(39),¥ (40). All elements of the X array are output before the first 
element of the Y array is output. 


WINDOW AND VIEWPORT EXAMPLES 


As a review, here are seven examples which illustrate capabilities of WINDOW and VIEW- 
PORT. All seven examples use the same figure for output: a circle of radius 75 centered at 

X = Oand Y = 0. They demonstrate how WINDOW and VIEWPORT determine what is shown 
on the display. Each example program performs three functions: 


1. Fill arrays X and Y with data necessary to draw the circle 
2. Define a window and viewport 


3. Draw the circle. 


In all seven examples, the statements which perform the first and third functions (above) 
are identical. The only difference among the programs is in function 2 — the window and 
viewport definition. 


Please enter the following statements (this is the first of the seven examples): 


PAGE 

DELETE ALL 

199 REM FILL ARRAYS WITH DATA 
118 Pa REPRESENTING A CIRCLE 


IT 

136 DIM XC729, 7672) 
148 SET DEGREES 
158 FOR I=1 TO 72 
168 XCP>=75eCOS(I¥S> 
7@ YCI=7SaSINCI¥S) 
188 HEXT I 

REM 


PAGE 
21@ REM DEFINE WINDOW AND UIEWPORT 
220 WINDOW 0,130,6+ 108 
238 VIEWPORT 8,138, 0, 186 
248 REM DRAW THE CIRCLE 
250 GOSUB 568 
268 HOME 


END 
Sa@ REM SUBROUTINE TO DRAW CIRCLE 
518 MOVE X¢72),1¢7?2? 
528 DRAW X,Y 
530 RETURN 


RUN 
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tn all seven examples, statements 100 through 190 are identical. These statements fill arrays 
X and Y with the appropriate data. Statements 500 through 530 are also identical in all 
seven examples. These statements form a subroutine to draw the data in arrays X and Y. 
The MOVE command at statement 510 positions the graphic point to the correct starting 
point for the circle to be drawn. This program’s output is shown below: 


As a result of these window limits, only the upper right quarter of the circle is shown on 
the display. 
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In the example below, the window is changed so that the whole circle is visible. Enter 
the following statements: 


228 RINDOW -130,130,-180, 100 
RUN 200 


This produces the output shown below: 


In the preceding example, the program was executed with the following command: RUN 
200. (This causes the program execution to start at statement 200.) Once data arrays X and 
Y have been filled with data, as they were in the first example of this series, they need not 
be filled again. Since filling the arrays with data is the function of statements 100 through 
190, these statements are skipped. 
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There is an implied horizontal and vertical scaling whenever a window is defined. The im- 
plied horizontal scaling and implied vertical scaling can be varied independently. The next 
two examples show that data which represents a circle will be drawn with a different shape 
if the window is defined inappropriately. Enter the following statements: 


228 WINDOW ~1{28, 136, -508, 580 
RUN 288 


In the program output above, the width of the drawn figure is the same as in the example 
which immediately preceded it. The WINDOW command arguments which specify the hori- 
zontal data range are identical in both examples. However, the WINDOW command argu- 
ments which specify the vertical data range are different. This causes the different shaped 
figures. 
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The next example changes the horizontal! range. Enter the following: 


228 WINDOW -500,588,-108, 120 
RUN 288 


To draw a figure with no distortion, the ratio of the viewport’s height and width must be the 
same as the ratio of the window’s height and width. This is discussed in more detail in 
section 8. 
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In the next example the window is restored to its previous dimensions (~130,130,—100, 100) 
but the viewport is changed so that it no longer coincides with the full size of the display. 
Enter the following: 


228 WINDOW -130,130,-180,180 
236 VIEWPORT 65,136.8,58 
RUN 288 


As the program output shows, the viewport is now defined to be the lower right corner of 
the display. This was specified in the VIEWPORT command in statement 230. There has 
been an implied change of scale because the same window must fit into a smaller portion 
of the display. 


Plot 50: Graphic Prog 1 -37 


GRAPHIC STATEMENTS 


GRAPHIC OUTPUT 7 


The next example shows how different windows can be defined for the same display area. 
Enter the following statements: 


PAGE 

228 WINDOW 8, 138,8,1288 

238 VIEWPORT 8,130,6, 188 

248 GOSUB 5ae 

258 WINDOW -130,138,-108; 180 
268 GOSUB 508 

270 HOME 

288 END 


RUN268 


The command GOSUB 500 appears twice. As a result, the circle ts drawn twice. There are 

two WINDOW commands. Each causes a different portion of the circle to be visible when 

the routine at statement 500 is called. However, only one viewport is defined {in statement ~~ 
230). This means that both windows occupy the same area on the display. 
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In the previous example, statements 220 through 260 determine what is placed on the dis- 
play. Here is a summary of their functions: 


220 WINDOW 0,130,0,100 Specifies a window which covers the upper right section 
of the circle. 

230 VIEWPORT OG,130,0,100 Specifies a viewport which fills the display. 

240 GOSUB 500 Draws the circle subject to the defined window and view- 


port, Because of the WINDOW command at statement 
220, only the upper right section of the circle appears on 


the display. 
250 WINDOW —13G,130,—100,100 Specifies a window which covers the whole circle. 
260 GOSUB 500 Draws the circle subject to the defined window and view- 


port. Because of the WINDOW command at statement 
250, the complete circle appears on the display. 


The next example draws everything seen on the display in the above example but, through 

a change in viewport parameters, draws the image in the upper right quarter of the display. 
[t also adds some additional data in the lower left quarter of the display. Enter the following 
statements: 


PAGE 

238 VIEWPORT 65,138,506, 188 
270 WINDOW -138,6,98, 188 
286 VIEWPORT 0,65,8,58 

298 GOSUB 5@e 

308 HOME 

318 END 


RUN208 


The entire program now looks like this: 


108 REM FILL ARRAYS WITH DATA 
116 REM REPRESENTING A CIRCLE 
12@ INIT 

13@ DIM X¢72),°¢72) 

148 SET DEGREES 

13@ FOR I#i TO 72 

16@ XC 1) #754aC0S¢145> 

17@ ¥CT)*75eSINCIKS) 

188 NEXT | 

196 REM 

280 PAGE 

216 REM DEFINE WINDOW AND VIEWPORT 
228 WINDOW 8, 138,8, 190 

230 VIEWPORT 65,130,5@; 108 

248 GOSUB 588 

250 WINDOW 1 3G, 130, -108, 188 
266 GOSUB 588 

278 WINDOW ~138,0,2; 188 

288 VIEWPORT 8,65,8,50 

298 GOSUB 588 

388 HOME 

318 END 

$@@ REM SUBROUTINE TO DRAW CIRCLE 
31Q MOVE X¢72), C72) 


528 DRAW X5¥ 
se eamaesthie Ges $3@ RETURN. 1-39 
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The output from this program looks like this: 





The above example demonstrates that any portion of the user data space can be shown at 
any place on the display. Statements 220 through 290 determine what is visible on the dis- 
play. Here is asummary of their functions: 


220 WINDOW 0,130,0,100 
230 VIEWPORT 65,130,50,100 


240 GOSUB 500 


250 WINDOW —130,130,—100,100 
260 GOSUB 500 
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Specifies a window which covers the upper right section 
of the circle. 

Specifies a viewport to be the upper right quarter of the 
display. 

Draws the circle subject to the defined viewport and 
window. Because of the WINDOW command at statement 
220, only the upper right section of the circle appears on 
the display. 

Specifies a window which covers the whole circle. 

Draws the circle subject to the defined window and view- 
port. The complete circle appears because of the WINDOW 
command at statement 250. 
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270 WINDOW —130,0,0,100 Specifies a window which covers the upper !eft section of 
the circle. 

280 VIEWPORT 0,65,0,50 Specifies a viewport to be the lower left quarter of the 
display. 

290 GOSUB 500 Draws the circle subject to the defined window and view- 


port. Because of the WINDOW command at statement 
270, only the upper left section of the circle appears. 


WINDOW AND VIEWPORT SUMMARY 


All seven examples iilustrate the same two principles: 


— The window and viewport are defined independently. Different windows can be de- 
fined for one viewport; different viewports can be filled with the same window. 


— The currently defined window and viewport together determine what appears on the 
display. 


WINDOW defines what data is seen. VIEWPORT defines where on the display it appears. 


AXIS COMMAND 








[ Line number | AXIS [ 1/0 address ] F axis tic interval in user data units , 


Y axis tic interval in user data units [ , X axis intercept in user data units , 





Y axis intercept in user data units ] 





The AXIS command draws horizontal and vertical axis lines, with tic marks if desired. The 
command can be used with four arguments, with two arguments or with no arguments. De- 
fault values are supplied in place of any missing arguments. The AXIS command with no 
arguments draws a horizontal and a vertical line through the origin of the user data space 

(X = 0 and Y = O in user data units) if this point is inside the defined window. If this point 

is not inside the window, the axis lines are drawn through the minimum X and Y data values. 
In other words, unless X = 0 is within the window, the vertical or Y axis is drawn at the left 
edge of the window; and unless Y = 0 is within the window the horizontal or X axis is drawn 
at the bottom edge of the window. 
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The following examples illustrate the default location of the axes. Enter the following: 
DELETE ALL 
PAGE 
108 PAGE 
118 INIT 


128 AXIS 
138 END 


RUN 


Since INIT is equivalent to WINDOW 0,130,0,100, the point X = 0 and Y = 0 is at the lower 
left corner of the display. So the vertical axis is at the left edge of the display and the hori- 
zontal axis is at the bottom edge. After the AXIS is drawn, the graphic point is placed at the 
intersection of the two axes. In the above example, the two axes intersect at the lower left 
corner of the display. When execution is complete, that is the cursor’s location. 


Press the PAGE key and enter the following statements: 


{15 WINDOR -58;58,-58, 58 
125 HOME 
RUN 
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The axis lines cross at the center of the display because that is the location of the origin 
{X =O and Y = QO) of the user data space. (The HOME command at statement 125 \s added 
to make updating this program easier.) 


Enter the following: 


115 WINDOW -108,-56,-188,-56 
RUN 


Plot 50: Graphic Prog 1 -43 


GRAPHIC STATEMENTS 


GRAPHIC OUTPUT 


The axis lines cross at the lower left corner of the screen, because that is where the mini- 
mum values of X and Y occur. Notice that the AXIS statement defines minimum value to 
be minimum algebraic value, not minimum absolute value. 


Enter the following: 


115 WINDOW -58, 30,56, 188 
RUN 
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7 GRAPHIC OUTPUT 


The vertical axis is now centered on the display because the point X = 0 is located halfway 
between the left and right edges of the display. The horizontal! axis, as before, passes through 
the Y data minimum and, as a result, is located at the lower edge of the display. 


The first two arguments of AXIS (whether it is being used with four arguments or only two) 
specify the interval in user data units between tic marks. The first argument Is the interval 
between tics on the horizontal or X axis; the second argument is the interval between tics 
on the vertical! or Y axis. If an interval of zero units is specified in either argument, no tics 
at all are drawn on the axis corresponding to that argument. 


Enter the following: 


115 WINDOW -25,25,~-25;25 
12@ AXIS 8,18 


RUN 


Because the arguments in the WINDOW statement have placed the point X = 0 and Y = Qin 
the middle of the screen, the axes are drawn with their crossing point centered on the screen. 
Notice there are no tic marks on the horizontal axis (because the first argument of the AXIS 
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statement is zero). However, because the second argument of AXIS is 10, there are tic marks 
on the vertical axis spaced 10 user data units apart. The tic marks are always aligned with 
the crossing point of the axes, as they are here. The length of the tic marks is always 1% 

of the viewport size in the corresponding direction. For example, if the AXIS statement is 
executed after a VIEWPORT 0,50,0,100 statement, the tic marks on the vertical axis are 

5 GDU in length (1% of the 50 GDU width of the defined viewport) and the tic marks on 
the vertical axis are 1 GDU in length (1% of the 100 GDU height of the defined viewport). 


The third and fourth arguments of the AXIS statement allow the user to specify the hort- 
zontal and vertical intercepts of the axes. The third argument is the location in horizontal 
or X data units of the vertical axis intercept. Similarly, the fourth argument is the location 
in vertical or Y data units of the horizontal axis intercept. 


Enter the following: 
128 WINDOW 0,260,0,286 


130 AXIS 8,8,18,188 
RUN 
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The AXIS statement causes the vertical axis to be drawn through X = 10, a point near the 
left edge of the display, and causes the horizontal axis to be drawn through Y = 100, a point 
in the middle of the display. 


Axis can be used to easily draw a box around the specified window. The example below 
illustrates how this is done. Press the PAGE key and enter the following statements: 
DELETE ALL 

188 Pate 

118 INIT 

128 DATA -48,55,-22,89 

138 READ W1sW2,W3,h4 

148 WINDOW Wi, W2,W3,W4 

158 AXIS 8,0.W1,W3 

1686 AXIS 0.0, W2,u4 


176 HOME 
188 END 


The AXIS command at statement 150 draws lines at the left and bottom edges of the window. 
For this particular task, two AXIS commands perform the function of one MOVE and four 
DRAW commands. 
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This part of the manual discusses output of characters (letters and numbers) to a graphic 
device. This is done with the PRINT statement. A fundamental concept of outputting in- 
formation to a graphic device is that the cursor’s location defines the starting point for both 
character output and graphic output (lines). !f a DRAW statement is executed, the starting 
point of the resulting line is the lower left corner of the cursor’s current position. If a 
PRINT statement is executed, the first character is normally output at the cursor’s current 
position and the cursor is moved to the position of the next character {to the right of the 
cursor’s starting position). 


POSITIONING WITH MOVE 


Character output can be placed anywhere on the display by preceding the PRINT with a 
MOVE. For example; press the PAGE and enter the following statements: 

DELETE ALL 

180 PAGE 

118 INIT 

120 PRINT “MESSAGE”; 

130 HOME 

148 END 

RUN 


MESSAGE 


GRAPHIC STATEMENTS 


CHARACTER OUTPUT 


The message is placed at the upper left corner of the display because that is the cursor’s 
position after the PAGE statement is executed. Enter the statements below: 


115 MOVE 8.8 
RUN 


The message is placed in the lower left corner of the screen because of the MOVE 0,0 state- 
ment. Enter the following statements: 


115 MOVE 65,5¢ 
RUN 
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MESSAGE 


In this case the message is placed in the middle of the screen because of the MOVE 65,50 
which places the cursor in the center of the screen. Enter the following statements: 


DELETE ALL 

186 PaGE 

116 WINDOW 6, 138,90, 180 

128 VIEWPORT 65,138,358, 108 
130 MOVE 138, 186 

148 DRAW -138,-188 

158 MOVE ~138,-188 

16@ PRINT "MESSAGE"; 

178 HOME 

188 END 
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SSAGE 


Notice that, although the line resulting from the DRAW statement is clipped at the bound- 
aries set up by VIEWPORT, the MOVE and PRINT statements are not clipped. After the 
WINDOW and VIEWPORT statements are executed, the center of the display is equivalent 
to X = Oand Y = O in user data units. It is also the lower left corner of the viewport. The 
DRAW statement attempts to draw a line beyond this point but is prevented from doing 
so. However, the MOVE statement can place the cursor at any point on the display and the 
PRINT statement can place characters at any point on the display. 
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CHARACTER SIZE 


Characters placed on the display with a PRINT command have only one size and orientation. 
The size of the characters has four components: the height of the five by eight rectangular 
dot matrix which is used to form the character, the width of that matrix, the horizontal dis- 
tance between adjacent characters in a line of characters, and the vertical distance between 
adjacent lines of characters. Refer to the figure below. These distances are all constant and 


are expressed in GDU’s as follows: 


CHARACTER 
SPACE 
HEIGHT 


POSITIONING WITH PRINT 



































CHARACTER 
WIDTH 
@ 800600 
 d 0e000 
> 4 $+ CHARACTER 
@@ @eeee@ $EIGHT 
oe 80000 
se 66000 
ee Seeee 
o@ 00000 
ee 0ee00 
ee 00000 
oe 00060 
ee 0eee0 
e@ 00000 
@e@ e@eee0 
o@ 08000 
CHARACTER 
SPACE 
el Height of character 1.88 GDU’s 
Width of character 1.55 GDU's 
Character space width 1.79 GDU’s 
Character space height 2.82 GDU's 


As described previously, the cursor can be moved to any point on the display by using the 
MOVE statement. There are also four characters which move the cursor on the display hori- 
zontally in increments of the distance between adjacent characters and vertically in incre- 
ments of the distance between adjacent lines. Using these characters, the cursor can be 
moved in any direction and thus can also be moved to any point on the display. 
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The following chart summarizes these four characters: 




















ACTION: CHARACTER OBTAINABLE HOW TO PLACE | ASCII 
MOVES NAME FROM KEY- INTOA VALUE 
CURSOR BOARD WITH CHARACTER 





STRING 




















To the right SPACE SPACE BAR 

To the left BACKSPACE CTRL H 8 
Down LINE FEED CTRL J 10 
Up VERTICAL TAB; CTRLK 11 





Three of these characters are entered as control characters: Control H, Control J, and Con- 
trol K. 


To enter a control character into the Graphic System, the CTRL key is used much like the 


SHIFT key. A control character is entered by pressing the desired character key while simul!- 


taneously pressing and holding the CTRL key. The “‘space”’ character (entered with the 
SPACE BAR) moves the cursor to the right by 1.79 GDU’s, the distance which separates 
adjacent characters. The ‘backspace’ character (which prints on the screen as “‘H”’ or 
“Control H’’} moves the cursor to the left by the same distance. The “‘Sinefeed”’ character 
(which prints on the screen as “J’’ meaning “‘Control J’’) moves the cursor down by 2.82 
GDU’s, the vertical distance which separates adjacent lines of characters. The “‘vertical tab”’ 
character (which prints on the screen as “’K”’ or “Control K’’) moves the cursor up by the 
same distance. These distances are all GDU’s and are not affected by the WINDOW, VIEW- 
PORT, or SCALE statements. When manipulating the cursor in this way, it must be remem- 
bered that the cursor is moved to the right whenever a non-control character is output. For 


an example of this method of cursor manipulation, press the PAGE and enter the following: 


DELETE ALL 


128 NOQVE 65,58 
138 PRINT “A BHJJCHHHOHKK"! 
14@ END 


RUN 
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The resulting output looks like this: 
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When the program has finished execution, the cursor is placed in the same position as the 
first character output (the A). 


As mentioned earlier, a fundamental point about outputting information to a graphic de- 
vice is that the cursor’s location defines the starting point for both character output and 
graphic output. For example, here is a program which draws two connected lines from the 
upper left corner of the display to the lower right corner of the display. Press PAGE key 
and enter the following statements: 


DELETE ALL 

188 PAGE 

118 INIT 

126 MOVE 8,188 
138 DRAW 65,58 
148 DRAW 138,86 
1358 HONE 

168 END 


RUK 
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if a PRINT statement is added between the two drawn lines, the end point of the first line 
and the beginning point of the second line no longer coincide. Enter the following statements: 


i135 PRINT “ABCDEF"; 
RUN 


ABCDEF 


The beginning point of the second line is displaced by the characters orinted by the PRINT 
command at statement 135. The DRAW command at statement 140 specifies only the end 
point to which the line will be drawn. It draws the line from wherever the graphic point is 


located when statement 140 is executed. 


This example illustrates that care must be taken when lines and printed characters are out- 
out in the same program. 
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One way to avoid inadvertent distortion of graphic output is to keep track of the number of 
characters being output at a given PRINT statement. Then, by using the control characters 
described above, backspace and up-space to the beginning location of any character output. 
Subsequent graphic output may be continued as if nothing had been output at that point. 
The next example illustrates a way to do this. Press the PAGE key and enter the following 
statements: 

DELETE ALL 

188 PAGE 

11@ INIT 

128 AS="ABCDEF" 

138 MOVE 8,188 

148 DRAW 65,56 

158 PRINT AS: 

168 FOR [=] TO LENCAS) 

178 PRINT “H"$ 

18@ NEXT | 


198 DRAW 130.8 
28@ HONE 


Here is the resulting output: 
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Control H is a backspace character. The FOR ... NEXT loop at statements 150 to 170 
simply backspaces the number of characters output in A$. The DRAW at line 180 is then 
continued appropriately. 


Statements 160 through 180 use only the number of characters in A$ to determine the 
graphic point’s movement. This is appropriate when the PRINT command is placed in a sub- 
routine. No positional information is then required by the subroutine. In the example pro- 
gram (above) statements 160 through 180 could easily be replaced by the following com- 
mand: MOVE 65,50. This approach is simpler in the context of the example. However, It 
might not be appropriate when used in a different program. The example here simply shows 
an alternative way to perform the same function which requires different information. One 
way requires the number of characters in the character string which is printed. The other 
way requires the position on the display where it was printed. Both approaches are valid. 


Pilot 50: Graphic Prog 


GRAPHIC STATEMENTS 


GRAPHIC INPUT 
GIN 


[ Line number ] GIN [ 1/0 address | target variable for X coordinate 


, target variable for Y coordinate 


Several commands in the Graphic System language are useful for finding out where the 
graphic point is located. The GIN or graphic input command is the principal means of per- 
forming this task. For example, press the PAGE key and enter the following statements: 
DELETE ALL 
188 PAGE 
INIT 
120 WINDOW @,880,0,888 
MOVE 8,8 
148 DRAW 280,188 
158 GIN A;8 
HOME 
178 PRINT AsB 
END 


288. 873846154 99,328 
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in the above example, the endpoint of the line shows the position of the graphic point when 
the GIN command is executed. The location of the graphic point in user data space deter- 
mines what values are placed in the GIN command's target variables. 


In a program such as the example above, it is unlikely that the values returned by the GIN 
command will exactly match the values in the DRAW command (statement 140). The ac- 
curacy of GIN is determined by the resolution of the graphic device being addressed, not 
on the GS. Each type of graphic device has a different resolution. For instance, the re- 
solution of a CRT display, such as the one on the GS, is different from the resolution of a 
olotter. If a full size viewport is defined for the display, the values returned from GIN will 
have less than .125% error. This represents a worst-case accuracy (for a full size viewport) 
of better than 1 part in 800. In the above example, the window is defined to be 800 by 800 
user units. An accuracy of better than 1 part in 800 means that the values returned by the 
GIN command will never differ more than 1 data unit from the values in the DRAW command. 


The values returned by GIN are user data units. Running the above example with a different 
window illustrates the significance of this fact. Enter the following: 


128 WINDOW 8, 368,90, 368 
RUN 
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Because of the totally different window, the actual! displayed location of the line’s endpoint 
has changed. However, the values returned from GIN are virtually identical. The arguments 
of the DRAW command are unchanged. Therefore, the location of the line’s endpoint in user 
data space is the same. 


As in the previous example, the maximum error {in user data units) will be no greater than 
1/800 of the defined window size. 


300* (1/800} = .375 user data units. 


Below is an example which uses GIN. This program moves the position of the graphic point 
with the user definable keys. The position of the graphic point is always indicated by the 
flashing dot matrix which is normally seen on the display. Enter the following: 


DELETE ALL 

i GO FO 168 
4 RMOVE 8,1 
> RETURN 

9 RETURN 

12 RMOVE 1,28 
13 RETURN 

24 RNOQUE 8,-1 
25 RETURN 

36 GIN As¥ 
37° RETURN 

48 GIN ASB 
41 MOVE X,Y 
42 DRAW AB 
43 X= 

44 Y=8 

45 RETURN 
166 INIT 

119 PAGE 

129 xX=9 

139 Y=@ 

146 MOVE 8,6 
15@ END 


RUH 
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Here is asummary of the key functions and a diagram of each function’s relative position: 


Key 1 Moves the graphic point up one data unit. 
Key 2 Moves the graphic point to the left one data unit. 
Key 3 Moves the graphic point to the right one data unit. 
Key 6 Moves the graphic point down one data unit. 
Key 9 Saves the current location of the graphic point as the beginning point of 
a line. 
Key 10 Draws a line from the last specified beginning point to the current location 


of the graphic point. 


Loown—t\} Vy} __IVt move Sy} onawt 
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The fundamental building block of drawn information ts the line. Any line is defined by a 
beginning point and an end point. To draw lines on the Graphic System, the DRAW com- 
mand is used. The arguments of the DRAW command determine the end point of a tine. 

The arguments of the DRAW command determine the end point of a line. The starting point 
for output on the GS display is the graphic point. DRAW causes a line to be drawn from 

the current location of the graphic point to the location specified in the DRAW command's 
arguments. The MOVE command simply moves the position of the graphic point to the 
location specified by the MOVE command’s arguments. 


The WINDOW command specifies the minimum and maximum limits of displayed data 
values. These are called user data units. The arguments of MOVE and DRAW are interpreted 
to be expressed tn these units. 


WINDOW -100, 108,-100, 168 
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The VIEWPORT command specifies the actual size and location of the rectangle on the dis- 
play which contains data limits defined by WINDOW. The arguments of VIEWPORT are ex- 
pressed in GRAPHIC DISPLAY UNITS. These units of measure are constant. GDU’s are 
used to specify an actual physical !ocation on the display. 


vA 
= 


VIEWPORT 30,90, 30, 78 


WINDOW specifies what data is to be seen. VIEWPORT specifies where on the display it 
is located. 


1 -64 Plot 50: Graphic Prog 


GRAPHIC STATEMENTS 


SUMMARY 


Both the WINDOW and VIEWPORT are set to default sizes whenever any of the following 
events occur: 


— the GS is turned on 


— any of these commands are executed: 
INIT 
OLD 
DELETE ALL 


WINDOW explicitly defines the data limits. WINDOW and VIEWPORT together imply scale 
factors. The SCALE command (with arguments expressed in user data units per GDU) ex- 
plicitly defines horizontal and vertical scale factors. SCALE and VIEWPORT together im- 
olicitly define the data limits. 


MOVE and DRAW specify a location in user data space which is “‘absolute’’, independent 
of the starting point. RMOVE and RDRAW specify a location relative to the present loca- 
tion of the graphic point. 


ROTATE applies only to RMOVE and RDRAW. A positive argument produces counter- 
clockwise rotation, a negative argument produces clockwise rotation. 


If the arguments of a DRAW command are arrays, all the data points in the arrays are con- 
nected with lines. For example, if X and Y are arrays, the command DRAW X,Y draws a 
line to the point X(1},Y(1)}, then the point X(2),Y(2), and so forth. RDRAW, MOVE, and 
RMOVE also have this capability. 


The AXIS command produces axis lines with tic marks if desired. If the intersection of the 
axis lines is not specified, a default location is computed. 


The PRINT command is used to place character information on the display. The characters 
can be located using the MOVE command or any of several control characters. Since the 
graphic point determines the starting point for both lines and characters, care must be ex- 
ercised when lines and characters are mixed in the same image. 


The current location of the graphic point in user data space can be found with the GIN 
command. {it returns values in user data units. 
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Any data to be graphed must first be input into the Graphic System. This section discusses 
input techniques appropriate for various types and sources of data. While each example pro- 
gram in this section can be run as listed, each one represents only the data input sub-section 
of a larger, more complete program. 


In this section of the manual, the term “data value’ denotes a single number while the term 
“data point’ denotes a pair of data values used to specify a location in user data space. 


Beginning at this point in the manual, the following assumption is made about all example 
programs: the GS memory has been cleared of any other program and data before the ex- 
ample is entered. Clearing memory is the function of the DELETE ALL command. It was 
used prior to each example in Section 1. There are a few instances where the example state- 
ments are to be added to a program already in memory. Each of these instances is specifically 
mentioned. 


Data to be graphed may be stored in a group of simple (non-subscripted) variables. For 
example, the first value plotted can be stored in Scalar variable A, the second value in B and 
so forth. As can be quickly seen, editing, plotting and otherwise manipulating data stored in 
this fashion is very cumbersome. A better technique is the use of arrays. With data stored in 
arrays, it is easier to have the machine do more of the required work. Either one or two 
dimensional arrays can be appropriate for a given situation. Ways to use one dimensional 
arrays are discussed in most of this section. Changes necessary for the use of two dimensional 
arrays are discussed at the end of this section. 


Before any data can be placed in an array, the array’s size must be initialized so that it con- 
tains at Jeast as many elements as the minimum number of data values expected. The DIM 
command is used for this purpose. Any program which uses the data in this array needs to 
know how many data values it contains. (This number may be less than the size of the 
array.) The user must set up some convention so that this may be accomplished easily. 


The most versatile way to communicate how many data points the array contains is to de- 
dicate one simple (non-subscripted) variable to contain the number of data values in the 
particular array. if any deletions or additions are made to the data array, then the number 
contained in the dedicated variable must also be decremented or incremented appropriately. 


Another way of accounting for the number of data values in an array is to have the dedicated 
location {containing the number of data values in the array) be the first element in the array. 
This has several disadvantages. The index of a particular data value {in relation to the other 
data values) is not the same as its location in the array. For example, the sixth data value in 

a given array of data values is the seventh element in the array. Another major disadvantage 
has to do with retrieving the array after it has been placed onto an external storage device, 
such as tape. This will be discussed in more detail in the part of this section which deals with 


tape. 
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Another method is to write the program so that it will recognize some number, such as 
—999.999, as a non-valid data value. This number is then placed in every array element 
which does not contain a valid value. Along with the storage-related disadvantage of the 
previous method, this method does not allow rapid determination of the number of data 
values a given array contains. 


All three of these methods require the same amount of storage: one more variable than the 
number of data values actually being stored. So the criteria of versatility and ease of use 
should determine which method is preferable. As described above, having a separate variable 
containing the number of data values is the best method for most applications. 
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To enter data into the GS from the keyboard, the INPUT command is used. There are four 
fundamental methods for using the INPUT command to bring data into an array. 


One way to place data from the keyboard into an array is with a FOR... NEXT loop, as in 
the following example: 


298 PARLE 

368 PRINT “SIZE OF ARRAY = "3 
318 INPUT N 

328 DELETE A 

330 DIM ACND 

348 FOR I=1 TO N 

35@ INPUT act) 

368 NEXT I 

378 REM END OF INPUT 

3886 END 


First, the desired size of the array is placed into the variable N (statement 310). Statement 
320 deletes the array. This is done to be sure that no other arrays are in memory with the 
same designation and that this array is dimensioned properly. Next, the size of array A is 
specified (statement 330). Then, a FOR ... NEXT loop is used to cause the INPUT state- 
ment to be executed the appropriate number of times, with each data value inputted being 
placed into the correct array element. 


There is a simpler way to perform the same task, taking advantage of the implied FOR... 
NEXT loop in the input statement. When the statement INPUT A is executed with variable 
A being an array, the GS automatically executes the INPUT statement enough times to fill 
the array. In effect, it sets up the FOR ... NEXT loop of statements 340 to 350 in the pre- 
vious example. So the last example can be replaced with the one below: 


238 PAGE 
388 PRINT "SIZE OF ARRAY = “5 
316 INPUT N 
328 DELETE A 
336 DIM ACN) 
348 INPUT A 
35@ REM END UF INPUT 
END 
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The input statement at line 340 will always start filling array A at its first element and con- 
tinue until the array is filled. If either of these actions is inappropriate thena FOR... 
NEXT loop, such as the one shown above, must be set up. Using the intrinsic array cap- 
ability of the INPUT command allows a series of input values to be separated by keys other 
than the carriage return. Some of them are the comma, the asterisk (*), the slash (/), or 

the up arrow (f). 


The other two methods of keyboard input (described below) involve setting up a continuous 


input loop which is then terminated in various ways. These methods share a common advant- 


age (the exact number of elements in the array does not need to be specified in advance) 
and two common disadvantages: the array must be dimensioned to a size which is estimated 
to be greater than the largest number of data values expected to be input; and a check is re- 
quired to ensure that the array size is not exceeded. 


It is possible to set up a loop to input data points into an array so that a particular data 
value, specified in advance, terminates the loop. For example: 


298 PAGE 

380 PRINT "SIZE OF ARRAY = “3 
318 INPUT N 

32@ DELETE A 

338 DIM ACND 

348 A=6 

356 C=8 

366 INPUT Ki 

370 IF Ki=-999.999 THEN 41€ 
388 C=C+1 


ACCI=Ki 
406 IF C<N THEN 368 


416 REM END GF INPUT 
4208 END 


Again, the count of valid data values, C, is only incremented after the input of a valid 
number has been completed. When this method is used, one data value must be specified 
as the flag. This particular value cannot be a valid data value. 
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A way to minimize this disadvantage is to specify what the flag value is to be before the be- 
ginning of the input loop. For example: 


PAGE 
PRINT "SIZE OF ARRAY = "3 
INPUT N 
PRINT "VALUE OF TERMINATING FLAG = "3 
INPUT T 
DELETE R 
DIM ACN) 
A=8 
C=8 
INPUT Ki 
IF Ki=T THEN 418 
=C+1 
ACC)=K1 
IF C<N THEN 368 
REM END OF INPUT 
END 


In this case, each data value input is compared with T, rather than a constant, to determine 
if the final data value has been entered. 


Another method is to use the character string capabilities of the GS. If a string of fetters is 
used to terminate the !nput loop, there is no requirement for any numeric value to serve as 

a flag. This method uses the string function VAL (which converts a character string composed 
of the characters 0.1, ...,9,E+,—) to a number. 


For example: 
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PRINT “SIZE OF ARRAY = "; 
INPUT N 

DELETE A 

DIM ACN sKSC28> 

A=0 

C=@ 

INPUT K$ 

IF K$="BONE" THEN 410 
CzC+1 

ACCFVURL KF) 

[IF C<N THEN 268 

REM END OF INPUT 

END 
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Using the program example above, data values can be entered into successive elements of 
array A until the character string DONE is entered. This will cause the GS to exit from the 
loop and begin executing the statements following the loop. Memory space will be conserved 
if the string variable K$ is dimensioned to the length of the longest anticipated terminating 
character string. The default size for K$ is 72 characters, an unneeded length in this con- 
text. A staternent such as 330 DIM A{N),K$(20) would be appropriate for this example, 
since most of numeric data values require fewer than 20 characters to express. 


It is also possible for the terminating character string to be specified just prior to the input 
loop. For example: 


298 PAGE 

389 PRINT "SIZE OF ARRAY = “: 

318 INPUT N 

326 PRINT “TERMINATING STRING = “; 
330 DIM T$¢(2@> 

346 INPUT T$ 

358 DELETE A 

368 raat ACN? KSC 28) 


38@ C=6 

398 INPUT K$ 

408 IF K$=T$ THEN 448 
416 C=C+1 

4280 ACCIZVUALCKS$) 

430 IF C<N THEN 399 
440 REM END OF INPUT 
458 END 


Both T$ and K$ have been dimensioned to conserve memory space. If not dimensioned, 
each would have space for 72 characters. When a character string identical to the one entered 
into T$ is input, the test in statement 400 is true and the loop is exited via statement 430. 


There is one terminating string which is very convenient to use: the null string. This is the 
character string which contains nothing. In the previous example, T$ contains the null string 
if the user enters only a carriage return in response to the “TERMINATING STRING = ” 
request. Another way to specifying the null string as the terminating string is shown in the 
following example. 


298 PAGE 

388 PRINT "SIZE OF ARRAY = "$ 
318 INPUT N 

320 DELETE A 

338 ea ACN) K$C203 


358 C=8 

368 INPUT K$ 

3°78 JF K$="" THEN 418 
388 C=C+1 

398 ACTIFVALCKF) 

408 IF C<H THEN 3698 
418 REM END OF INPUT 
4298 END 
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To terminate this loop, merely follow the carriage return which enters the last data value 
with an extra carriage return. The extra carriage return inputs a null string, which is recog- 
nized and causes the loop to be exited. 


Another technique for terminating an input loop is to set up a user definable key as the 
terminating event. For example: 


i GO TO 296 
4 GO TO 398 


PAGE 

PRINT “SIZE OF ARRAY = "3 
INPUT 4 

DELETE A 

DIM ACH) 

A=8 

SET KEY 

FOR I=i TON 

INPUT ACT) 


NEXT I 
REM END OF INPUT 
END 


In the previous example, pressing the user definable key 1 causes an immediate branch to 
statement 390. When statement 390 is executed, | will be one greater than the number of 


data values input. 


A similar example: 


1 GU TO 298 
4 G0 TO 38¢ 


298 
388 
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PRINT "SIZE OF ARRAY = "3 
INPUT N 

DELETE A 

DIM ACND 

R=-339.999 

SET KEY 

INPUT A 

REM END OF INPUT 

FOR T=1 TQ N 

IF A¢13=-999,999 THEN 418 
NEXT I 

C=I-] 

aA C IS NUMBER OF YALID CATA VALUES 
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This example uses the array capability of the GS to do much of the required work. State- 
ments 380 through 410 are required because, with this approach, there is no intrinsic way to 
determine how many values have been input into the array. (In the previous example, the 
value of | after leaving the FOR .. . NEXT loop provided that information.) Statement 340 
is needed to initialize all the array elements to a specified dummy value. Any element con- 
taining this value has not had a valid data value placed into it. Statements 380 through 410 
determine how many valid data values have been entered. 


Prior to graphing the input data, the minimum and maximum must be known. There are two 
times this can be done: as the data is entered, and just prior to graphing. If variable R11 is 

the minimum and R2 is the maximum, the following is an example of how the minimum 
and maximum might be determined at entry time: 


298 PAGE 

380 PRINT “SIZE OF ARRAY = "5 
318 INPUT NN 

328 DELETE A 

338 a ACNIKEC28) 


343 R1=1.8E +368 

347 R2=-1.8E+388 

358 “eran 

366 INPU 

37@ IF RSE" THEN 418 
386 C=C+1 

398 ACCISVALCKS) 

393 Ri=Ri MIN ACO? 
397 R2=R2 MAX ACC) 
408 IF C<N THEN 368 
410 REM END OF INPUT 
420 END 


The min-max determination adds only four statements (343, 347, 393, 397). The two initi- 
alization statements {343 and 347) set the minimum to an artifically large positive number 
and the maximum to an artificially large negative number. This ensures that any given data 
entry will be detected as a minimum or a maximum. (If statements 343,347,393 and 397 
are removed, the above example is identical to the one on page 2-6 which uses the null 
string to terminate the input loop.) 


The other time to determine the minimum and maximum is just prior to graphing. This 
technique has the advantage of including any changes to the data which occurred after it 
was entered. In the following example, C is the number of data items in array A and R1 
and R2 are the minimum and maximum respectively. 
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PRINT "SIZE OF ARRAY 2 "3 
INPUT N 

DELETE A 

oe ACN) K$C28) 


CxQ 

INPUT K$ 

IF K$="" THEN 418 
C=C +1 

ACT ISVALCKS) 

IF CCN THEN 368 
REM END OF INPUT, FIND MIN & MAX 
Ri=1.8E+38a 
R2=-1.BE+306 

FOR [=1 TOC 
RieR1 MIN ACT) 
R22R2 MAX ACID 
MEXT I 

END 


DATA INPUT 


FROM THE KEYBOARD 


This technique of scanning after entry is useful when data is entered from sources other than 


the keyboard, as examples later in this section demonstrate. 


Use of the minimum and maximum values is discussed in Section 3 of this manual. 


Plot 50: Graphic Prog 


2-9 


DATA INPUT 


EDITING AN ARRAY 


2-10 


Editing a data array already in the GS memory is sometimes necessary. Data editing is made up 
of five processes: 


— Listing current data 

— Replacing a data value with a new one 

— Deleting a data value 

— Appending a data value to the end of the current array 


— Inserting a data value into the current array. 


Referring to any data item within an array can only be done two ways: by referring to the 
item’s position or index within the array (e.g., A(4)), or by referring to the value of the data 
item (e.g., the first data item equal to 3). Because a data item's index is so often used for 
reference, and because the five editing processes each have a different effect on the contents 
of a data array, care must be exercised during an editing operation. 


The five editing processes are now discussed in the order mentioned, with examples. The 
array used, A, can contain no more than N data values. In the following five examples, N is 
20. C is the working size of the array. It represents the number of valid data values currently 
contained in array A. In each of the following examples, 10 is the beginning value of C. Each 
of the first ten elements of A is filled with a value which is ten times the element's index. 
(Statements 160 through 180 in each program perform this function). 


LISTING DATA 


When listing an array, it is very useful to print each item beside that item’s index. This 
simplifies further reference to each data point. Here is a way this can be done: 


19@ PAGE 
118 INIT 


Axs 
16@ FOR I=1 TOC 
178 ACT) =1041 
188 NEXT I 
198 REM LIST VALUES IN ARRAY A 
208 IF C>@ THEN 238 
21@ PRINT “NO DATA VALUES IN ARRAY A" 
228 GO TO 26U 
238 FOR I=1 TOC 
248 PRINT I;,A<TD 
258 NEXT 1 
268 END 
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These statements cause each data item to be printed on the display just to the right of that 
data item’s index. There is a check to ensure that the program will not attempt to print an 
empty array {statement 200). If C is zero, there are no valid data values in the array. An 
array with no data values should not be fisted. 


In the next four example programs the index number of an array element is required before 
the specific editing function can be performed. If the nuli string is entered when the pro- 
gram requests the element index (by pressing only the carriage return key at that point), 
program execution is terminated in each case. 


CHANGING DATA 


tf a given data value is to be changed, the following statements can be used; they allow 
changes to be made very easily. 


198 PRGE 
118 INIT 
1289 H=20 
138 C=i9 
140 oy ACN? 


R= 
16@ FOR I=1 TOC 
17@ ACT =10%! 
188 NEXT 1 
19@ REN CHANGE DATA VALUE 
206 PRINT “INDEX OF ITEM TO CHANGED = "$ 
218 INPUT I$ 
2260 IF I$="" THEN 318 
238 T=VALCI$) 
249 IF I=>1 AND I<=C THEN 278 
256 PRINT “INDEX 1S OUT OF RANGE" 
268 GO TO 318 
276 PRINT "CURRENT VALUE OF AC"STE") IS “rACTS 
288 PRINT “CHANGE THIS TO "; 
298 INPUT ACI> 
36@ GO TO 198 
318 END 


Included is a check for a proper item number (statement 240}. The current item’s value is 
printed prior to the change being made. In this example, the input to the process is treated 
as a string which is tested to see if it is the terminating string. If it is, the process is exited 
{in the example, control branches to statement 310). If it is not the terminating string, then 
the change process is continued. 


Neither of the previous two examples resulted in any change of the number of data items in 
the array. All three following processes will result in a change in the number of data items 
in the array. 


Pilot 50: Graphic Prog 2 = 4 1 


DATA INPUT 


EDITING AN ARRAY 


APPENDING DATA 


lf a given data point is to be appended to an array, the following statements will accomplish 


the task: 


The number of data points in the array (C) is changed only after valid input has been entered. 


PAGE 

INIT 

N=20 

C218 

DIM ACND 

Az8 

FOR I=i TOC 
ACT)=18%1 


NEXT I 

REM APPEND DATA VALUE 

IF CX<N THEN 238 

PRINT "ARRAY IS FILLED" 

GO T0 290 

PRINT "VALUE OF ITEM TO BE APPENDED = "S 
INPUT U$ 

IF U$="" THEN 230 


C=C+} 
ACTUAL CUS > 
GO TO 286 
END 


The array A has been dimensioned to contain N data elements. A check has been included 


so that the array’s size will not be exceeded and thus cause an error (check is statement 200). 


2-12 


Plot 50: Graphic Prog 


DATA INPUT 


EDITING AN ARRAY 


DELETING DATA 


If a given data point is to be deleted from an array, the following statements can be used: 


10@ PAGE 
1iQ@ INIT 
128 N=20 
138 C219 
148 DIM ACK) 


Az8 
168 FOR I=! TO C 
178 ACT>=10%1 
188 NEXT I 
198 REM DELETE DATA VALUE 
208 IF C28 THEN 238 
216 PRINT “ARRAY IS EMPTY" 
228 GO TQ 378 
238 PRINT “INDEX OF ITEM TO BE DELETED = "j 
248 INPUT I$ 
258 IF I$="" THEN 378 
268 I=VALCI$> 
27@ IF T=>1 AND 1<=C THEN 289 
288 PRINT “INDEX IS OUT GF RANGE" 
299 GO TO 208 
308 PRINT "VALUE DELETED = "§ 
318 PRINT ACI) 
328 FOR J2I+1 TOC 
338 AC J-“1) FAC) 
340 NEXT J 
358 C=C-1 
368 GO TO 208 
END 


The program must “‘ripple”’ through the array, moving all data items after the deleted one 
toward the beginning of the array by one position. 
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DATA INPUT 


EDITING AN ARRAY 


INSERTING DATA 


The last kind of editing mentioned is the insert process, allowing a data value to be inserted 
at any point in the array. This process must also “ripple” through the array, but it moves 
all the data items toward the end of the array by one position. 


188 PAGE 
1148 INIT 
128 Ne20 
139 C=18 
148 DIM ACN) 


A 
i6@ FOR I=1 TOC 
178 ACT)=10%1 
188 NEXT I 
198 REM INSERT BATA VALUE 
206 IF C<N THEN 238 
2i1@ PRINT oar 1S:-FILUED* 
226 GO TO 378 
23@ PRINT “INDEX OF ITEM TQ BE PRECEDED = "3 
248 INPUT I$ 
256 IF I$="" THEN 379 
266 J=VALCI$) 
27@ IF I=>1 AND I<=C THEN 380 
280 PRINT “INDEX IS OUT OF RANGE" 
298 GO TO 288 
360 FOR J=C TO I STEP -1 
318 cue ge 
328 NEXT J 
338 C=C+1 
348 PRINT "VALUE TO BE INSERTED = "5 
358 INPUT ACT) 
368 GO TO 198 
376 END 


The working size of the array (C) must be incremented to make room for the insertion 
statement 330). Statement 270 is a check to ensure that the item preceded is within the 
working size of the array. Statement 200 is a check to ensure that the array is large enough 
to contain the insertion. 
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DATA INPUT 


FROM A FUNCTION 


Graphing a single-valued function is fundamentally similar to graphing an array of data 
values. However, there are some differences in the way the data is supplied to the graphing 
program. 


The most satisfactory way to set up the graphing of a function is to place the function to 

be graphed within a FOR... NEXT loop. This can be done directly, as in the first program 
example in Introduction. It can also be done indirectly, by placing within the FOR. . .NEXT 
loop a GOSUB reference to the function. For example: 


° 


108 FOR X=B TO E STEP I 
118 GOSUB 6802 

i28 DRAW X,Y 

138 NEXT X 


6880 REM SAMPLE FUNCTION 
6418 Y=SINCX) 
68620 RETURN 


Any function to be graphed need only be keyed into the GS starting at line 6000 and followed 
by a RETURN statement. 


Notice that the FOR ... NEXT loop requires certain information about the function’s in- 
dependent variable {called X in this example). Three values must be specified: the beginning 
value {called B in this example), the ending value (calfed E in this example}, and the in- 
crement (called | in this example). This data allows the GS to successively evaluate the func- 
tion within a specified domain at specified intervals. 


A minor change is necessary if graphing a specified number of points within the domain of 
the function is desired. The FOR... NEXT loop lends itself to using a specified increment. 
'n order to graph a specified number of points, divide the total domain (the maximum 
minus the minimum) by the number of points desired. The quotient will be the increment. 
With this approach, statement 100 of the previous example would look like the following: 


100 FOR X=B TOE STEP (E—B)/N 


In this case, N is the desired number of points to be graphed. 
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In order to graph the function, two additional data are required: the minimum and maxi- 
mum of the function within the specified domain. Unless these values are estimated, they 
must be determined by evaluating the function throughout its domain just as if it ts being 
graphed. An example of how this is done follows (this example cannot be run as listed}: 


* 
a 


108 REM FIND MINIMUM AND MAXIMUM 

11@ REM MINIMUM IS Mi, MAXIMUM IS Me 
128 Mi=1.0E+380 

138 M2=-1.0E&+388 

148 FOR t=B8 TO E STEP | 

15@ GOSUB 688¢ 

16Q0 Mi=Mi MIN Y 

178 M2=M2 MAX ¥ 

188 NEXT & 

196 WINDOW B,E,M1,Nz 


668@ REM SAMPLE FUNCTION 
6810 Y=SIN¢%) 
6828 RETURN 


The minimum and maximum resulting from this calculation can be used directly ina 
WINDOW statement. This ensures that the viewport is filled with the appropriate part of the 
user data space. 


Parametric functions are handled in much the same way as simple functions. (This manual 
calls Y = SIN({X) a simple function and 


een a parametric function.) 
x=cosiT) °°? | 
To graph a parametric function, or to find its minimum and maximum, the only change 
needed in the above examples is in the variables in the FOR and NEXT statements (this 
example cannot be run as listed): 
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188 FOR T=B TQ E STEP I 
118 GOSUB 6866 

128 DRAW X,Y 

13@ NEXT T 


6886 REM SAMPLE PARAMETRIC FUNCTION 


6818 Y=SINCTS 
6028 X=COS¢T) 
6838 RETURN 


DATA INPUT 


FROM A FUNCTION 


It is possible to have the same program graph both simple and parametric functions. A 
convention must be made as to which variables are dependent and independent in simple 
and parametric functions. The chart shows the convention used in the following example: 


VARIABLE 


DEPENDENT 
VARIABLE 


Cd] 
a 


*& 


108 FOR T=B TO E STEP I 
11@ X27 

128 GOSUB 6088 

13@ DRAW X,Y 

14@ NEXT T 


1] 


60966 REM SIMPLE FUNCTION 


6618 Y=SINCX> 
6026 RETURN 


SIMPLE FUNCTION PARAMETRIC FUNCTION 
INDEPENDENT x T 


X& Y 


ts 
a 


188 FOR T=8 TO E STEP | 
118 X=T 

128 GOSUB 6888 

138 DRAW X;¥ 

14@ NEXT T 


680@ REM PARAMETRIC FUNCTION 
6618 X=COS(T) 

6828 Y=SINCT> 

6038 RETURN 


ee The function at line 6000 will be evaluated properly regardless of whether it is simple or 


parametric. 
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Any discussion of graphing data stored on tape must be prefaced with a discussion of appro- 
priate ways to store data onto tape. The GS internal tape drive is a sequential access device. 
This means that in order to read a data item at the end of a tape file, the whole file must be 
read in first. Reading a data item that precedes one which was just read is a two step pro- 
cess. First, the tape must be positioned back to the beginning of the file. Then, in order to 
find the desired item, the file must be re-read up to the desired item’‘s location. (The tape 
can only be positioned within a file by reading data.) This means that the kind of data 
manipulation done by a program should influence the way it stores and reads data on the 
tape. Here is one method of storing data on the tape which is suitable for data to be graphed. 
The first value to be stored in a tape file is the number of graphed points which will fill 

the remainder of the file. Each graphed point might typically require 1, 2, or 3 numeric 
values to describe. If, for example, the data stored on the tape is to be used in a two-variable 
(or X—Y) graph, each point on the graph wil! require two data values to describe it: an X 
value (usually used for the graphed point’s horizontal location) and a Y value (usually used 
for the vertical location). Therefore N, the first value in the tape file, will be equal to the 
number of pairs of data items in that tape file. The total number of data items in that file 
will be (2*N}+1. The best way to store these items is with the X and Y data values for a 
given graphed point adjacent to each other on the tape. For a two-variable graph’s data, the 
tape file looks like this: 


N,X(1),¥(1),X(2),¥(2), .. . X(N—1), Y(N—1) X(N), Y(N) 


Below is a program which will write and read files with this arrangement: 


1668 Page 


INTT 
128 REM WRITE THE DATA FILE 
ige Cz20 
149 FIND § 
15@ MARK 1, 18%2%¢Ce#t> 
168 FIND | 
{79 WRITE CV 
i@e FOR T=i TO C 
190 WRITE 1641, 1.64146. 1 
208 HEXT I 
218 CLOSE 
228 REM READ THE DATA FILE 
238 FIND 1 
248 READ @335N 
258 FOR I=1 70 N 
268 READ @332K:Y 
2°8 PRINT Xs¥ 
288 NEXT I 
298 END 
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Prior to writing data to tape, the tape must be marked into files. The file being written to 
must be MARKed large enough to contain the data to be stored into it. Each data value 
stored on the tape with the WRITE command requires 10 bytes. Therefore, the number of 
bytes required for a given file is 10 times the number of data values to be stored. The storage 
arrangement described above includes an extra value containing the number of data points 
in the file. The number of data values stored in the file is the product of the number of 
graphed points and the number of data values per point, plus one. The ‘‘plus one” reserves 
space for the extra data value (at the beginning of the file) which contains the number of 
data points within the file. If C is the number of graphed points and P is the number of data 
values per point, then the number of bytes of space in a tape file required to contain this 
data is 10*(P*C+1). Statement 150 performs this function in the above example. 


Statement 190 writes sampie data onto the tape in the order described. The CLOSE com- 
mand (statement 210) should be executed after the last data item has been written to a file. 
It ensures that the data has been properly written to the tape. 


To read the tenth data point on the tape, the following program can be used: 


ttn 
120 ae WRITE THE DATA FILE ¢(C IS NUMBER OF DATA PRIRS> 


148 FIND 8 
158 MARK 1,18%2%¢C+1) 
FIND 1 


170 WRITE C 

188 FOR Izi TO C 

198 WRITE 101, 1@x1+@.1 
208 NEXT I 


CLOSE 
228 ae P IS THE INDEX OF THE DATA PAIR TO BE READ 
=} 


246 FIND i 

258 READ @33°N 

26@ IF P<=N THEN 296 

278 PRINT “INDEX IS GREATER THAN NUMBER OF PAIRS IN FILE" 
288 GO T0 348 

290 FOR I=1 TO P-1 

368 READ @33:0;8 

318 NEXT 1 

328 READ @33°KsY 

33@ PRINT "16TH DATA PAIR [5 "iks% 
348 EXD 


Plot 50: Graphic Prog 2 - 1 9 


DATA INPUT 


FROM TAPE 


2-20 


The Q variables in statement 300 are used merely to allow the READ statement to move the 
tape; Q is a “dummy” variable having no direct usefulness. Use of the variable P (in state- 
ments 230, 260, and 290) is not necessary. The constant 10 could have been used in this 
case. The variable P was used to show how any data point within the file may be accessed 
with this method. 


The method of storing data on tape described in this section has one inherent disadvantage. 
It requires the user to keep track of how many data values are associated with each data 
point. There is no intrinsic indication on the tape whether each data point requires one, two, 
or more data values to represent it. It is imperative to remember whether there are one, 

two, or more data values for each data point within a file. 


An easier way to store data on the tape is to use the implied looping of statements which 
have arrays for arguments. For example: 


1@8 PAGE 
118 INIT 
128 sa WRITE THE DATA FILE (C IS THE NUMBER OF PAIRS» 


U 
148 DIM KCC), 7<0> 
FIND @ 


168 MARK 1, 10%2k(C+1) 
178 FIND 1 

188 FOR I=1 TOC 
1398 4¢(T)=194] 

208 YC l)=16k1+@. 1 
216 HEXT ] 

226 WRITE CiXs¥ 
238 CLOSE 

248 INIT 

258 FIND 1 

268 READ @33iN 
278 DIM ACN>,BCND 
288 READ @3358.8 
298 PRINT As8 
388 END 


The data is stored on the tape in the following arrangement: 
N,X(1),X(2), ... X(N—1), X(N), Y(1),¥ (2), . 2. Y(N—1,Y(N) 


All of the data is written onto the tape by statement 220 (above). All of the data is read 
from the tape by statements 260 and 280. 
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Although this method ts very simple and easy to use, it has a significant disadvantage. It re- 
quires a GS whose memory is large enough to hold all the data internally at one time. Since 
the X and Y data values for a given point are located at two different places on the tape, at 
least one FOR... NEXT loop ts required to access one data point. 


18@ PAGE 


INIT 
ac ea WRITE THE DATA FILE <C IS THE NUMBER OF PAIPFS) 
1 =29 
140 DIM XCCd,YCO) 
IND @ 
160 MARK £5 10%24¢C+1> 
FIND 1 


188 FOR [=i TOC 

196 X(T >=1@%1 

208 YC] =10x1+6. |} 

218 NEXT 1 

220 WRITE Cyks¥ 

238 CLOSE 

246 INIT 

250 FIND 1 

268 REM P IS THE INDEX GF THE DATA PAIR TO BE READ 
2r@ P=18 

28@ READ @33°h 

298 DIM ACN) 

380 READ #3354 

31@ FOR I=1 TO F-1 

32@ READ #33: 

33@ HEXT | 

348 READ @33:61 

35@ PRINT "16TH DATA PAIR IS "SACP *.B! 
368 END 


-— 
tA 
a 
“TT 


This kind of program is necessary unless the entire contents of both X and Y arrays have 
been read into memory. 


The first method described, with the X and Y data values for a given point adjacent to each 
other on the tape, is the superior method in cases where all data to be graphed cannot be 
contained in the GS memory at one time. If all the data can be contained in the GS memory 
at one time, then the method shown immediately above ts preferable. 


Finding the minimum and maximum of the data prior to graphing is necessary when the 

data comes from tape. This can be done two ways: if all the data is contained in memory at 
one time, the min-max scanner on page 2-9 can be used; if all the data is not In memory, 

the tape can be scanned using the following kind of program (X and Y are the two data 
values for each data point, X1 and Y1 are the minimums, and X2 and Y2 are the maximums). 
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108 PAGE 
H 

120 REM WRITE THE DATA FILE (C 1S NUMBER OF DATA FAIRS) 
cs: 


148 FIND @ 
158 MARK 1, 10*2kCC+1> 
FIND 1 


178 WRITE C 

188 FOR I=1 TOC 

198 WRITE 1641, 104I[+0.1 

208 NEXT I 

218 CLOSE 

228 REM FIND MIN & MAX OF DATA ON TAFE 
238 X1=1.8E+386 

248 Y1=1.0£+308 

250 X2=-1.8E+300 

268 Y2=-1.6E+388 


388 READ @33°%,¥ 

31i@ Ai=Ki MIN X 

328 K2=K2 MAX X 

338 Y1=Y¥1 MIN Y 

348 Y2="2 MAX Y 

358 NEXT I 

36@ PRINT " ", "MINIMUM", "MAXIMUM" 
378 PRINT "&K"sX15X2 

388 PRINT “Y"s 71,72 

398 END 


After the FOR... NEXT loop at statements 290 through 350 is complete, X1 wil! contain 
the minimum X data value, X2 will contain the maximum X data value, Y1 will contain the 
minimum Y data value and Y2 wil! contain the maximum Y data value. No arrays or other 
large areas of memory were reserved or required. These minimum and maximum values can 
be used directly in a WINDOW command, allowing the data on tape to be graphed one pair 
of values at a time. The technique above is important because it is a key to graphing more 
data than the GS can contain in memory at one time. 


SUMMARY 


The procedure described above is one approach to storing data arrays on tape using READ 
and WRITE. Here is a summary of that approach. 


If the GS memory ts large enough to contain all the data of interest, then the most con- 
venient way to store and retrieve data on tape Is to use the inherent looping of the WRITE 
and READ commands. {In the examples below, F is the number of the file to contain the 
data and N is the number of data points. Each data point can be specified with one, two, or 
three data values. Data 1s contained in arrays A, B, or C, and in simple variables X, Y, or Z. 
None of the program segments below can be run as listed.) 
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For one data value per point: 


To write data: 


208 DIM ACND 

216 FIND F 

220 MARK 1, 184%(N+1> 
238 FIND F 

248 WRITE Ny 

258 CLOSE 


The tape file looks like: 
N,A(1),A(2),... A(N—1},A(N) 


To read data: 


286 FIND F 

218 READ @33:8K 
228 DELETE A 
238 DIM ACHD 
248 READ @33:8A 


For two data values per point: 


To write data: 


206 DIM ACH) BOND 
FIND F 


220 MARK 1, 18%¢2XN+1) 
238 FIND F 

248 WRITE N5As8 

258 CLOSE 
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The tape file !ooks like: 
N,A(1),A(2},... A(N),B(1),B(2), . . . BN) 


To read data: 


28@ FIND F 

218 READ @33:N 
22@ DELETE A»B 
238 DIM ACN), BIND 
248 READ @33:A58 


For three data values per point: 


To write data: 


288 DIM ACNI, BIND, CCNS 
218 FIND F 

228 MARK 1,10% (S4N41> 
238 FIND F 

246 WRITE Ns A,ByC 

258 CLOSE 


The tape file looks like: 
N.A(1),...,A(N),B(1),...,B(N),C(1),... CCN) 


To read data: 


200 FING F 
218 READ @33:N 
520 DELETE A,B,C 


230 DIN ACN), BOND CiND 
248 READ @33:2A,8,0 
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When data with more than one value per point ts stored on tape, an additional consideration 
becomes important. When using the approach in the above six examples, the data values for 

a given point are not placed on the tape in adjacent locations. Retrieving the data values for 
just one point is cumbersome unless the GS memory is large enough to contain all data values 
at one time. 


If all the data cannot be contained within the GS memory at one time, then the above ap- 
proach is not suitable. Below is another method in which data values are stored and retrieved 
individually. 


For one data value per point: 


To write data: 


200 FIND F 

218 MARK 1, 1@%<¢N+1) 
220 FIND F 

238 WRITE N 

248 FOR T=i TO WN 
258 WRITE * 

268 NEXT I 

2°78 CLOSE 


The tape file looks like: 
N,X(1),X(2),... X(N—1},X(N) 


To read data: 


288 FIND F 

218 READ @33:N 
226 FOR I=1 TO N 
238 READ #33: % 
248 NEXT ! 
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For two data values per point: 


To write data: 


288 FIND F 

218 MARK 1.1086 24N41) 
228 FIND F 

238 WRITE N 

248 FOR I=i TQ N 

238 WRITE Xs¥ 

268 NEXT 1 

278 TLOSE 


The tape file looks like: 


N,X(4), Y(1},X(2),¥ (2), ... X(N—1), Y(N—1), X(N), Y(N) 


To read data: 


* 


260 FIND F 

218 READ @33:N 
228 FOR I=t TQ N 
258 READ @332K%,7 
248 WENT I 


For three data values per point: 


To write data: 


286 FIND F 

218 MARK 1, 10%¢3¥N+1) 
228 FIND F 

238 MRITE N 

246 FOR I= TO H 

250 WRITE AyV¥52 


268 NEXT | 
278 TLOSE 
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The tape file looks like: 
N,X{1),¥(1),Z(1),X(2),¥ (2),Z(2), .. 2, X(N), YIN),Z(N) 


To read data: 


206 FIND F 

210 READ @33°N 
226 FOR I=1 TU N 
238 READ O23iK.Ys2 
248 NEXT I 


The WRITE and READ @33: commands used in this section pertain to BINARY data files. 
Numbers in binary data files are in the same form as they are internally in the GS. Data can 
also be stored and retrieved on tape with the following commands: PRINT @33: and IN- 
PUT @33: . (The primary address of 33 refers to the interna! tape drive on the GS.) These 
commands pertain to ASCII data files. Since numbers in ASCII data files are strings of ASCII 
characters, ASCII data files can be read by devices outside the GS family. Binary data files 
can be read only by another GS. However, data stored in ASCII data files takes longer for 
the GS to transfer to and from tape because an additional conversion process must be per- 
formed. All the example programs in this section using the WRITE and READ @33: com- 
mands would remain virtually unchanged if the PRINT @33: and INPUT @33: commands 
were substituted. Only the amount of space reserved on the tape for each data value would 
need changing. in a binary file, 10 bytes must be MARKed. In an ASCII file, 18 bytes must 
be MARKed for each data value. {n virtually all instances, it is best to use the WRITE and 
READ @33: commands to store and retrieve data on tape. 
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GRAPHING 


INITIAL CONSIDERATIONS 


Before any graphing can be done, the minimum and maximum of the data or function to be 
graphed must be established. This can be done by scanning the actual data values, evaluating 
the function over the specified domain of interest, or by merely estimating. In any event, 
this must be done to provide values to use in the WINDOW statement, or to otherwise 
specify what will be graphed. 


The next consideration is how the data or function will be displayed. For graphing one data 
array, a single valued function or other data where there is some logical connection between 
adjacent points, a line drawn through all the data points is usually appropriate. For graphing 
two independent data arrays, certain parametric functions, or other points where there is 
not necessarily a logical connection between adjacent points, some kind of point or symbol 
graph is more appropriate. Several methods will be suggested in this section. 
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The line graph as shown below is used to display data which one of the variables associated 
with each point is an orderly progression of values, such as would be generated by a function 
(Y = #(X)) evaluated at regular intervals throughout the X domain of interest. A line is also 
appropriate for graphing array data items versus their indices within an array. 


The line graph, or rather the actual data curve at the heart of aline graph, is generated by 

a series of DRAW commands. An important aspect of this process is that the DRAW com- 
mand causes a line to be drawn from wherever the graphic point is currently located to the 
specified focation within the window. When the first point on the data curve is drawn to, 
the graphic point is usually at some unknown or irrelevant location on the screen. So a 
MOVE to the first point to be graphed, rather than a DRAW, is appropriate. As a result, the 
FOR... NEXT loop which draws the remainder of the data starts with the second data 
point. A line graph of a one-dimensional array can be produced with the following state- 
ments (these must be run as part of a complete program): 


220 WINDOW O,NsR1,R2 
23@ MOVE 1,7¢1> 

248 FOR I=2 TO N 
258 DRAW 1,¥CI> 

268 NEXT | 


N is the number of data values in the array Y. 
R1 is the minimum data value in the array Y. 
R2 is the maximum data value in the array Y. 


A complete program to draw a line graph of ten random data values is shown below: 
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198 PALE 

118 INIT 

126 N=19 

138 OIM YCND 

14@ Ri=1,9&+389 

138 R2=-1.8E+368 

166 FOR I=1 TO N 

178 YCI)=RNDC-2> 

188 RizVY¢cI) MIN Ri 
198 R2=YCI) MAX Re 
208 HEXT | 

218 VIEWPORT 19,120,160; 94 
228 WINDOW G,N.R1,R2 
2380 MOVE 1,Y¢1) 

246 FOR I=2 TO N 

258 DRAW I,Y¢1> 

268 NEXT I 

278 END 


A graph is sometimes easier to look at if it has some blank space around it. This is why the 
viewport is defined to be slightly smaller than full size in the above example (statement 210}. 
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POINT GRAPH 


When there is no direct relationship between adjacent data points, or no reason to connect 
them together with lines, a point graph or symbo! graph is appropriate. The following ex- 
ample graphs two arrays. The first value in the X array determines the horizontal location 
of the first point, the first value in the Y array determines the vertical location of the first 
point, and so forth. (The statements below must be run as part of a larger program:)} 


+ 


258 WINDOW RieR2.51,S2 
268 FOR I=i TO N 

278 MOVE KCL YC] 

288 DRAW KCI, YCID 

298 NEXT 1 


* 
3 


N is the number of data values in each array, R1 is the minimum value in the X array, R2 is 
the maximum value in the X array, $1 is the minimum value in the Y array and 92 Is the 


maximum value in the Y array. In the FOR... NEXT loop, there is a MOVE to each point = 


followed by a DRAW to each point. Since the graphic point is already located at the point 
drawn to, only a dot, not a line, is drawn. 


A complete program to draw data points on the display is shown below: 


126 RESTORE 

138 DATA 16,1.0F+300,-1.06+300.1.86+300.-1.HE+ Jud 
140 READ Ne R1.R2,51,52 
158 DIM XCND« VEN? 

169 FOR I=1 TQ N 

7S ACTI=RNDC-2) 

188 Ri=X¢I> MIN Ri 

198 R2=8CT> MAX R2 

208 YCT>=RNDC-2> 

218 S$1=YC1) MIN Si 

228 S2-VC1) MAX $2 


NEXT I 
240 VIEWPORT 16, 120,18,98 
258 WINDOW R1,R2;S1.52 
268 FOR I=1 TO N 
278 MOVE X(T), YC) 
288 DRAW KCI, ¥<T) 
298 HEXT I 
368 END 
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This is the programs output: 


PRINTED SYMBOLS 
To make individual data points distinguishable, each point’s location can be marked with a 
symbol instead of just a dot. 


The simplest method is to use a standard GS character for the symbol. With this method, the 
graphic point is positioned on the display with a MOVE command (statement 270 in the 
examples above and below). Then the symbol is written onto the display with a PRINT 
command, as shown in the program fragment below (these statements must be run as part 

of a larger program): 


3-5 
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258 
cée 
278 
289 
298 


? 


WINDOW RI WR2Si¢S2 
FOR [=i TON 

MOUE ACT, CT) 
PRINT "4" 

NEXT | 


2 


Although the character ‘’+’’ is shown in the example, any character can be used. If these 
statements (above) are used, the center of the printed character will be above and to the 
right of the desired location on the display (see diagram below). 


Positions Graphic Point Here. 


The above diagram shows that the MOVE command positions the lower left corner of the 
character. If the center of the printed character is to coincide with the point specified by the 
MOVE command, the graphic point must be re-positioned slightly after the MOVE command 
(statement 270) and before the PRINT command (statement 280). The statements added 

in the following example (273, 278, and 285) center the *’+”’ over the graphic point. 


256 
268 
or 

ers 
erg 
236 
282 
285 
298 


WINDOW R1isR2.51552 

FOR I=1 TOR 

MOUE SCTse¥C Ta 

SCALE isi 

RMHQUE ~O,541.55.-b.5¥!1.88 
PRIHT "+#"5 

RMOVE B.Sk1.55,.9,9%1.88 
WINGOW Rt ,R2,$1,.52 

NEXT I 
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Since the characters written by the PRINT command are always the same size, the graphic 
point must always be re-positioned the same distance, regardless of how the window has 
been defined. The SCALE 1,1 command at statement 273 defines a new data space to fill 
the viewport. Within this new data space, 7 data unit is the same length as 1 GDU. The 
RMOVE command is then used to re-position the graphic point relative to its current posi- 
tion. In order to center the character, the graphic point should be moved half a character 
width to the left and half a character height down. The RMOVE command at statement 278 
performs this function. After the character is printed, the window must be restored to its 
previously defined limits. If it is not restored, the remainder of the graphed points will be 
placed inaccurately on the display. 


Care must be exercised if the above technique {(PRINTed characters as symbols) is used when 
a default (full size) viewport has been defined. If the graphic point is at the very top, bottom, 
left or right edge of the physical display when the character is printed, the character will 

not be printed in the correct location. This inaccuracy is prevented whenever the defined 
viewport is less than full size. The largest viewport which still prevents this inaccuracy from 
occurring is defined with the following command: 


VIEWPORT 2,128,2,98. 


DRAWN SYMBOLS 


Another way to place a symbol at the location desired is to actually draw it. This is done 
with a series of relative moves and draws from the location the symbol indicates. The following 
example draws a diamond to indicate a location: 


2508 WINDOW RiR2,$1,S2 
268 FOR I=1 TO N 

270 MOVE X¢C1>,¥CT> 

288 SCALE 1,1 

298 RMOVE 1,9 

3@0 RDRAW -1,;-1 

318 RDRAW -1,1 

328 RDRAW 1,1 

336 RDPRAW 1, -1 

348 RMOVE -1,8 

358 WINDOW R1,R2.51,S2 
369 NEXT I 
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The SCALE 1,1 at statement 280 ensures that the symbols will always be the same size re- 
gardless of how the window and viewport have been defined. Line 290 ensures that the 
symbol is centered over the location to be indicated. Lines 300 through 330 draw the symbol. 
Line 340 restores the graphic point to its location before the symbol! was drawn. Line 350 
restores the window so that subsequent data points will be graphed correctly. 


Below is the complete program and the output it produces. 


108 PALE 

118 INIT 

128 RESTORE 

130 DATA 10,1.0&+380,-1.0&+308,1.0E£+308,-1.0E+308 

148 READ N-«R1,R2,$1,S2 

158 DIM XN), YCND 

168 FOR I=i1 TO N 

178 XC1>=RNB(-2>) 

188 Ri=X¢I) MIN Ri 

198 R2=X¢( I> MAX R2 

288 ¥¢C1)=RND(-2) 

216 Si=YCI> MIN Si 

228 S$2=¥CI>) MAX S2 

238 NEXT I! 

24@ VIEWPORT 18,120,10,98 

258 WINDOW R1,R2,51,S2 

268 FOR i=1 TON 

278 MOVE KCI3, YC) 

286 SCALE 1,1 

296 RMOVE 1,8 

368 RORAW ~1,-1 

316 RDRAW -i;1 

320 RDRAW 1,1 

33@ RDRAW i,-1 

346 RMOVE -1,8 

35@ WINDOW R1,R2,51;,S$2 
NEXT I 


378 END 
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Drawn symbols are subject to clipping. Printed symbols are not. 


The symbol size can be made proportional to a data value or function result as shown in the 
following program fragment: 
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WINDOW Ri,R2.S1;S2 
FOR I21 TON 

MOVE XCID,YCI> 
SCALE i,1 

RMOVE 2Z(1>,8 

RDRAW -2¢1),-2¢1) 
RDRAW -Z2¢1),2¢1>) 
RDRAW 2¢1),2¢1) 
RDRAW 2¢13,-2¢1) 
RMOVE -2¢(1),8 
RIMOOW R1,R2,S1,S2 
NEXT I 


+ 
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More than one kind of symbol can be drawn by a program. In addition, the actual symbol 
can be selected by a data value. Using the GOSUB ... . OF . . . command, as shown below, 
makes this very easy. 


258 WINDOW R1,R2,51,S2 
268 FOR I*#1 TON 
270 MOVE XC(1),YCD) 


SCALE 1;1 
298 GOSUB 2¢1) OF 508,688, 780 
388 WINDOW Ri,R2,S1,S2 
318 HEXT I 
328 END 


SGQ REM DRAW A DIAMOND SYMBOL 


55@ RETURN 
68@ REM DRAW A SQUARE SYMBOL 


658 RETURN 
7a@ REM DRAW A TRIANGLE SYMBOL 


750 RETURN 
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If there are several lines on one graph, a very good technique to identify each line is to draw 
a symbol at each graphed point. A program like this: 


228 WINDOW BYN R1,R2 
238 MOVE 1,AC1) 

248 GOSUB 408 

258 FOR f=2 TO N 

268 DRAW I.AC1) 

278 GOSUB 488 

280 NEXT | 


408 REM PRINT SYMBOL 
418 PRINT "+"; 
428 RETURN 


will produce a line like this: 
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To properly position the printed character, the correction described on page 3-6 must be 
included. The corrected program segment is shown below: 


WINDOW O,N,R1,R2 
MOVE 1,ACL> 
GOSUB 420 

FOR [22 TO N 
DRAK 1,ACT> 
GOSUB 488 

NEXT I 


REM PRINT SYMBOL WITH CORRECTED POSITION 
SCALE 1,1 

RMOVE -8.5%1.55,-8.541,88 

PRINT "+"; 

WINDOW @,N,R1,R2 

RETURN 


a 
s 


Below is a complete program which uses the above technique. The program output is shown 


also. 


180 


PAGE 

INIT 

RESTORE 

DATA 18,1.0E+300,-1.0E+308 


FOR I=1 TON 
ACL>=HIt2 

RizACI> MIN RI 
R2=ACI) MAX R2 
HEXT I 

VIEWPORT 18,120; 10,98 
WINDOW @,N,R1,R2 
MOVE 1.AC1) 
GOSUB 480 

FOR I=2 TO N 
DRAW I,ACy) 
GOSUB 486 

aaa I 


ND 

REM PRINT SYMBOL WITH CORRECTED POSITION 
SCALE 151 

RAQVE ~@,.5%1.55,-8.5%1.88 

PRINT "4"; 

RMOVE @6.5%1.55,8,.5%1.88 

WINDOW 6,N,R1,R2 

RETURN 
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Even with this correction included, the characters are not positioned with their centers ex- 
actly over the desired point. [f the position of the symbol must precisely coincide with the 
indicated location, drawn symbols are more appropriate than printed symbols. 
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Another way to represent certain kinds of data is with vertical or horizontal rectangles in- 
stead of lines and points. 


Hy) 





These are called bar charts or histograms. They are really a special type of symbol graph. 
The symbol in this case is a rectangle or line whose height is proportional to the data value 
being represented. One end of the rectangle or line is usually on a base line (as in the first 
example graph, above). However, depending upon the data being presented, this will not al- 
ways be the case (as in the second example graph). This second technique is sometimes used 
to present the performance range of a variable at a given time, such as daily stock market 
averages. 
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Here is a way to draw vertical lines whose lengths represent data values: 


208 WINDOW @,NX1.1,0,R 
AXIS 
52@ FOR l=1 TO N 
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The vertical lines can be changed to vertical bars by replacing the DRAW statement at state- 


ment 240 with a subroutine branch. 


488 
428 


430 
448 


3-16 


WINDOW O,N%1.1,@,R 
AXIS 


FOR I#1 TON 
MOVE 1-8 


VE Is 
GOSUB 488 
NEXT I 


RDRAH O; 
RETURH 
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The heights of the bars are the same as the heights of the lines in the previous example. 


Here is the complete program which generated the output shown above: 


188 PAGE 

118 INIT 

128 N218 

138 R=-1.6E+388 
148 DIM ACKD 

136 FOR I2i TO N 
16@ AcI>#S@RCI) 
178 es MAX R 


NEXT 1 
19@ VIEWPORT aa oe 86 
288 rr tg By NX1.1,8,R 


220 FOR I#i 10 HN 
230 MOVE 1,8 

248 GOSUB 488 
258 NEXT I 
266 ENG 

488 RDRAW -8.5,8 
418 RDRAW 6,ACT> 
422 RORAW 8, 

438 RDORAW 8; 

448 RETURN 


eT) 
Ac! 
338 
-ACT) 


In the previous example, the height of each bar represented a value contained in a specific 
array item, i.e., the value of one variable. Often this bar graph technique will be used to 
graph a continuous variable, such as the distribution of 50 occurrences of a random number 
which can have any value between 0 and 1. The next example shows how this can be done. 


18@ PAGE 

118 INIT 

128 $=188 

130 R=-1,8E+389 

146 DIM ACI) 

158 A=8 

168 FOR I*i TO S$ 

178 J=INTCRND(-2)418)+1 
186 ACJ SACI +1 

198 R=ACJ) MAX R 

208 NEAT I 

218 VIEWPORT 20,.110,20,88 
220 WINDOW @,11,8,R%1.! 
238 AXIS iat 


268 GOSUB 408 
2790 NEXT I! 

286 END 

4898 RDRAK -1,8 
416 RDRAK @,ACT> 
428 RDRAR 1,2 

438 RDRAW B,-ACT> 
448 RETURN 


Plot 50: Graphic Prog 3 -71 J 


GRAPHING 


OTHER TYPES OF GRAPHS 


3-18 





The loop which actually does the graphing (statements 240 through 270) is similar to pre- 
vious examples. The width of the bars has been increased until the bars are now adjacent to 
each other. The array A is filled by statements 160 through 200. A(1) contains the quantity 
of random numbers whose values fell between 0 and .1, A(2} contains the quantity of ran- 
dom numbers whose values fell between .1 and .2, and so forth. The MAX function is use- 
ful to find the maximum number of incidences in any category (statement 190). The re- 
sulting maximum value (R) is used in the WINDOW command in statement 220. 
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Graphing the percentage each category is of the total number of incidences (50 in this 
example) requires only a vertical rescaling determined by the data. The quantity of incidences 
in each category is divided by the total! number of incidences to yield a decimal fraction. 

This is multiplied by 100 to yield a percentage. The graph looks the same, so only the listing 
is shown as the example. 


108 PALE 

118 INIT 

128 $=58 

138 R=-1.0E+380 
148 DIM ACI@) 


R=8 
16@ FOR I=i TO S$ 
178 JEINTCRND(-2)%10)+1 
188 ACJIFACIJI4+1 
198 R=ACJ> MAX R 
208 NEXT I 
218 VIEWPORT 26.118;2 
220 WINDOW Os 11.0sR-S 
23@ AKIS 145 
246 FOR I=1 TO 18 
298 MOVE [-1,8 
268 GOSUB 422 
278 NEXT | 
EN 


D 
$08 RDRAW G,ACT>-Sax1a8 
416 RORAW 1,8 
428 RDRAW O,-AC 1) Setkiae 
4386 RETURN 


8,89 
Otigdel.1 


Data expressed in this percentage form can be graphed in another way. The height of each 
vertical bar, now a percentage, can be interpreted to be the width of a slice of acircle. This 
produces a ‘“‘pie chart”, shown in the following example. The same data is being used. 


1Q@8 PAGE 

118 INIT 

128 $=58 

138 R=-1.8E+380 

148 DIM ACI) 

158 Aa=0 

168 FOR I#1 TO S 

178 JE INTCRND(-2)4185+1 
188 ACIJIZAC J +1 

198 R=ACJ) MAX R 


NEXT I 
218 VIEWPORT 28,80,.20,92 
220 WINDOW -i,1,-i;1 
225 SET DEGREES 
238 MOVE 1,9 
246 FOR [=i TO 18 
242 FOR T=18 TO 360 STEP 18 
244 DRAW COS<T>.SINCT)D 
246 NEXT T 
258 B=6 ! 
268 FOR I=i TO 18 
276 B=B+368k (AC 1758) 
288 MOVE 8,8 
296 DRAW COS(B>, SIN(B> 


388 NEXT | 
318 END 3-19 
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Up to this point, the discussion has covered graphs where the actual function or data is pre- 
sented. None of the data has been manipulated between entry and graphing. However, there 
will be many instances where the actual raw data or function will not be of interest unless 

it is suitably transformed. Three examples: 


temperature data taken in Fahrenheit degrees but used in a formula which requires 
Celsius degrees; 


data taken in miles per hour but used in the form of meters per second; 


data taken in the form of dollars per hundred weight but used in the form of francs 
per kilogram. 


There will be many situations where the transformation is neither linear nor simple. For 
example, in a laboratory situation, temperature might be measured with a resistor whose 
resistance varies as a function of its surrounding temperature. Thus the instrumentation 
which supplies data to the GS will be sending data values in the form of ohms. The GS pro- 
gram handles data in the form of degrees Celsius. The formula for the relationship between 
ohms and degrees Celsius over the range of interest is used as a transformation. During data 
editing and graphing, the data being dealt with will then be degrees, not ohms. 
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In the three examples which follow, lines 100 through 210 are identical. They fill array A 
with data values and place the smallest and targest of these values into M1 and M2 respectively. 
And, in all three examples, lines 250 through 280 perform identical functions: graphing the 
data in array A. 


In the first example, the data is graphed with the index of the array item on the horizontal 
axis and the actual array value on the vertical. Both scales are linear. 


188 PRGE 
INIT 
128 eo 20, 118,28, 88 


148 DIM ACN) 

150 N1=1. E430 
160 422-1. 0E+300 
17@ FOR I=1 TON 
189 ACI» eIt2 

196 Mi=Ni MIN ACID 

208 M2=M2 MAK ACT) 

218 NEXT I 

228 REN GRAPH ACTUAL DATA CHORIZ & VERT.» 
230 WINDOW 1)NsMisM2 

24@ AXIS 

25@ MOVE 1,AC1> 

268 FOR 1=2 TO N 

278 DRAW I,AC1) 

280 NEXT I 

298 END 
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In the next example, the horizontal information is as before, the index of the array Item. 
The vertical information is not the actual value contained in the array item but the log to 
the base 10 of the value in each array item. 
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188 
118 
128 
138 
148 


PAGE 

INIT 

VIEWPORT 28,116,28,80 
N=i@ 

DIM ACN> 


15@ Mi=1.@E+308 


M2s- 1 * GE+300 
FOR I*1 TON 
ACT) =#It2 

MizM1 MIN ACID 
N2=M2 MAX ACTI> 


NEXT I 
REM VERTICAL DATA TRANSFORMED BY LOG BASE 18 
WINDOW LeNysLGTCML) sLGTCM2> 


AXIS 
MOVE 1,LGTCAC1>D 


FOR I=2 TO N 
DRAW I,LGTCACTI >) 
NEXT I 

END 
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In the third example, the logs of both the array item index and the value contained in the 
array item are graphed. 


188 PAGE 
INIT 
{20 ci 28,116, 28,88 


148 DIM ACND 

158 Mi=1.0E+380 

168 M22-1.9E+308 

178 FOR {=1 TO W 

188 ACI=It2 

198 MizMi MIN ACID 

288 M2=N2 MAX ACID 

218 NEXT I 

220 REM BOTH HORIZ. & VERT. DATA TRANSFORMED BY LOG BASE 18 
238 WINDOW LGTC1>,LGTCNDsLGTEM1>,LOT (Med 


AXIS 
250 MOVE LGT(1>,LGTCACI)> 
268 FOR I=2 TO N 

278 DRAW LGTCI>,LGTCACT >> 
288 NEXT I 

29@ END 
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in all of the previous examples, the type of transformation used is reflected in three areas: 


* In the WINDOW command (line 230 in each example). The transformation is used to 


make sure that the data completely fills the specified viewport. Because each example 
uses a different transformation, the viewport in each case is ‘looking at” slightly dif- 

ferent areas of the user’s data space. As a result of the transformation being reflected 

in the WINDOW statement, the starting and ending points of all three data curves are 

in the same place on each graph. 


In the MOVE command (line 250 in each example). As described previously, this state- 
ment is necessary so that the data curve will start at the first data point, not at where- 
ever the graphic point is when the program is run. The transformation must appear here 
for the data curve to start in the appropriate location. 


In the DRAW command (line 270 in each example). Since this is the statement which 
actually causes the data curve to be drawn, the transformation must appear here so that 
the curve is drawn as desired. 
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There are two significantly different approaches to this transformation process. In one 
approach, the data is stored and edited in the GS in its original incoming form. The data Is 
transformed to a new form only when it is graphed. This approach is appropriate if the data 
in its incoming form is the primary concern. The way in which it is graphed is of secondary 
interest only. This approach was used in the group of three examples. A polar graph is an- 
other example. It is always appropriate to deal with polar data in its original form of angle 
and radius. But to graph it on the GS, it must be transformed into cartesian coordinates. As 
in the three examples, this transformation must be reflected in the WINDOW command 
(statement 240, below) in the initial move to the starting point of the data curve (statement 
270, below), and in the DRAW command which actually draws the curve (statement 290, 
below}. 


In a polar graph, as in some other types, the transformation used must also be reflected in 
the minimum-maximum determination (statements 190, 200, and 230, below). This is be- 
cause the data minimum and maximum do not coincide with minimum and maximum hori- 
zontal and vertical locations on the screen. (This is the case in the three examples.) 


108 PAGE 


INIT 
126 SET DEGREES 
130 DIN RC18)>,7(18> 
148 M1=1.8E+3@@ 
138 M2=-1.0E+308 
16@ FOR I=i TO 18 
178 T(1)2363] 
188 RCID>#] 
19@ Mi=Mi MIN RID 
200 M2=N2 MAX RCI) 


NEXT I 
228 REM NOW FIND MAXIMUM RADIUS 
238 M3=ABS(M1> MAX ABS<M2> 
248 WINDOW -M3,M3,-M3,M3 
258 re ieee 28,80; 26,38 


AXIS 
278 MOVE RC1LDECOSCT CLD SRCLIRSINGT CLD 
288 FOR I=2 TO 18 
298 DRAW RCTACOSC TCI RCTIESINGT CID 
308 NEXT 1 
318 END 
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Polar graphs have another special characteristic. They require equal horizontal and vertical 
scaling. This means that a vertical user data unit must have the same displayed length as a 
horizontal user data unit. If this is not the case, objectionable distortion will result. For ex- 
ample, a circle might be drawn as an ellipse. This requirement can be satisfied by using the 
SCALE command with equal arguments. Another solution, shown in the polar graph ex- 
ample, is to make sure that the window and viewport have the same aspect ratio. This is 
another way of saying that their shapes are proportional. In the above example, both the 
window and viewport are square. As a result, the spiral data curve is undistorted. 


In the second approach to the transformation process, the data is transformed prior to 
storage. This approach is desirable when the form in which the original data is received is 
never appropriate or convenient to use (such as when the incoming data is in the form of 
degrees Fahrenheit and is to be used in the form of degrees Celsius). In this approach, the 
actual transformation is done when the data is input. This means that the transformation 
needs to be used only when the data is transformed for storage (statement 210 in the ex- 
ample below). The min-max determination, the WINDOW and the MOVE to the first point 
all are performed on the transformed data. This approach is less cumbersome than trans- 
forming the data just prior to graphing and is more convenient to use when the situation 
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108 PAGE 
INIT 
128 a 28,128; 28,88 


146 Mi=1.8E+38e 
158 N2=-1.8E+380 
160 DIM CCND> 
178 FOR I=] TON 
18@ REM STATEMENT 198 SIMULATES INPUT @6: 
19@ F=RND(-2)4188+32 
20@ REM CONVERT INPUT DATA FROM FAHRENHEIT TO CELSIUS 
219 CCT) =5XCF-32979 
220 MisM1 MIN CCT3 
238 M2=M2 MAX CiT> 
248 NEXT I 
250 WINGOW 6,N, M1, M2 
AXTS 


278 MOVE 1,0¢1> 
288 FOR I=2 TO WN 
298 DRAW 1,C(T) 
388 NEXT ! 

318 END 
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Occasionally, the transform which operates on the incoming data must be variable. For ex- 
ample, a different temperature probe might be used for another run in the same experiment. 
If one program is to be used to graph data passed through a variety of transforms, it is ap- 
propriate to place the transform in a defined function. The following is an example of this. 


110 INIT 
115 DEF FHACAD=Sk(A-32)79 
128 VIEWPORT 20,128, 20,80 


200 REM CONVERT INPUT DATA FROM FAHRENHEIT TO CELSIUS 
218 CCL)=FNACF) 
228 ML=M1 MIN CCI) 


The above example is identical to the one before it except that the transform used is defined 
in a function (in statement 115). Each subsequent use of the transform will be identical — 
merely a function call as in statement 210. So by changing one statement, the transform 
used by the entire program can be changed. The next section will illustrate a particularly 
useful application for this capability. 


There are several classes of transformations which are commonly used for transforming data. 
(In the following formulae: X,Y,R, and T represent variables; A and B represent constants.) 


TRANSFORMATION EXAMPLE OF USAGE 

Log to the base 10 DRAW X,A*LGT({B*Y) 

Log to the base e DRAW X,A*LOG(B*Y) 

Polar (R = radius, T = angle) DRAW R*COS(T),R*SIN(T) 
Exponential DRAW X,A t (Y+B) 

Power DRAW X,YTA 

Logit DRAW LOG(X/({1—X)),Y forO<X <1 
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An axis or grid makes graphed data much easier to understand. This section describes two 
classes of ways to add axes and grids to a graph: with use of the AXIS command, and with- 
out the use of AXIS. For most graphs, use of AXIS will be appropriate. Techniques which 
use the AXIS command are discussed first. However, there are some types of data for which 
use of AXIS is inappropriate, such as logarithmic and polar data. So the other class of pro- 
cedures discussed is how to make axes and grids without using AXIS. 


WITHOUT ARGUMENTS 


The simplest way to add axis lines to a graph is with the AXIS command, described in 
Section 1. Here is a brief review. Please enter and run the following program: 


188 PAGE 
INIT 

128 VIEWPORT 5,55,35,95 
AXIS 


148 REM 
15@ VIEWPORT 75:125,55.95 
166 WINDOW -100, 188,50, 100 
178 AXIS 


REM 
198 VIEWPORT 3.5555, 45 
288 atti 38; 188, -100, 188 


REN 
238 VIEWPORT 75,125,545 
248 WINDOW -25. 75s 7-259 7S 
258 AXIS 
268 HOME 
278 END 


Shown below is the output produced by the above program: 
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In the above program, the AXIS command is used four times. Each time it is used, no argu- 
ments are specified. When an AXIS command is executed with no arguments, the locations 
of the resulting axis lines are determined by the last defined window. With no arguments, 
AXIS draws each axis line through the data minimums specified in the last WI NDOW com- 
mand. However, if zero lies within either data range, the corresponding axis line is drawn 
through zero instead of the minimum. The above example program is a demonstration of 
how WINDOW determines the default locations of the AXIS lines. 


When AXIS is first used (statement 130), only the default window (0,130,0,100) is defined. 
(The VIEWPORT command at statement 120 causes the window which contains the axis 
lines to be placed in the upper left part of the display.) In the second use of AXIS in the 
above example (the upper right set of axis lines in the above output), the WINDOW com- 
mand at 160 places zero in the middle of the horizontal range. In the third use of AXIS 


(the lower left axis lines in the above output), zero is in the middle of the vertical data range. 


In the fourth use of AXIS, zero is near the lower end of both data ranges. 
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WITH ARGUMENTS 


AXIS can also be used with two or four arguments. In either of those cases, the two arqu- 
ments immediately following the AXIS command specify the distance in user data units be- 
tween tic marks. The first argument refers to the horizontal axis tic marks and the second 
argument refers to the vertical axis tic marks. The following program illustrates how these 
arguments change the AXIS command’s function. 


10@ PAGE 

118 VIEWPORT $,55,55,95 
12@ WINDOW 10, 180,-188, 198 
138 AXIS 18,28 

148 VIEWPORT 75.125,55,95 
15@ AXIS 18,9 

168 VIEWPORT §,55,5,45 

179 AXIS 18,8,98,-58 

186 HOME 

196 END 
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Both axis lines in the upper left of the display (drawn by the AXIS command at statement 
130) have tic marks. Tic marks are not drawn on an axis line if the corresponding argument 
in the AXIS command is zero. In statement 150, the second argument of the AXIS com- 
mand is zero. As a result, the vertical axis in the upper right set of axes lines does not have 
tic marks. 


The third and fourth arguments of the AXIS command specify the crossing point of the 
axes. The third argument specifies the horizontal location of the vertical axis. The fourth 
argument specifies the vertical! location of the horizontal axis. In spite of their being drawn 
in an identical window, the set of axis lines in the lower left or the display cross at a dif- 
ferent location than the other two sets of axis lines shown. The crossing point was specified 
by the third and fourth arguments of the AXIS command in statement 170. 
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Another way to place an axis on the screen is to actually draw the lines using MOVE and 
DRAW. The remainder of this section describes how this is done for linear, logarithmic, and 
polar axis types. Understanding the material in the remainder of this section is necessary 
only for an application which requires an axis different from that produced by the AXIS 
command. If the axis requirements are adequately satisfied by the AXIS command, you 
may want to skip to the beginning of the next section. 


WITHOUT TIC MARKS 


The next example uses MOVE and DRAW to place axis tines on the screen. For the vertical! 
axis fine, all this entails is moving to the point where the vertical axis and the Y data mini- 
mum meet (X and —500 in this case) and drawing to the point where the vertical axis and 
the Y data maximum meet. A similar process is used for the horizontal axis. Inherent in a 
program of this nature is the location for the crossing point of the two axis lines, which is 
X = 1950 and Y = O in the next example. 


188 PAGE 

118 VIEWPORT 20,118,280, 88 

128 WINDOW 1958, 1980, -580, 588 
138 REN VERTICAL AXIS LINE 
148 MOVE 1958, -508 

158 DRAW 1958, 588 

168 REM HORIZONTAL AXIS LINE 
17@ MOVE 1950,8 

18@ DRAW 1980,8 

198 HOME 

28@ END 


Plot 50: Graphic Prog 5 -5 


AXIS 


WITHOUT AXIS COMMAND 


WITH TIC MARKS 


The addition of tic marks makes the axis lines more helpful in understanding the data graph. 
The best way to add tic marks is to use a MOVE and a DRAW ina FOR... NEXT loop. 
This is shown in the next example. 
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Pace 

UIENPORT 28,110,29,80 
WINDOW 1958, 1988,.-508, 588 
REM VERTICAL AKIS LINE 
MOVE 1958,-368 

DRAW 1956, 5e9 

REM HORIZONTAL AXIS LINE 
MOVE 1950,8 

DRAW 1988.8 

REM VERTICAL AXIS TICS 
REM TIC LENGTH = 2% OF RANGE 
T=(1986-1958)%6. 81 

FOR I=~5900@ TO S88 STEP 19@ 
MOVE 195@-T,I 

DRAW 1958+T,! 

NEXT I 

REM HORIZONTAL AIS TICS 
T=(5§80--508)*6.01 

FOR [={958 TO 1986 STEP 5 
MOVE I,-T 

DRAW I,T 

NEXT I 

HOME 

END 
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The axis crossing point and the distance between tic marks must be specified. With this 
technique, the distance between tic marks is implied by the STEP size in each FOR state- 
ment. 


With the AXIS command, the actual size of the tic mark is defined to be 1% of the window 
size. With the technique in the above example, it must be explicitly specified. In the above 
example, it is 2%. (The length of the tics on the horizontal axis is 2% of the vertical data 
range.) The variable T contains a value equal to 1%: half of a horizontal axis tic is below the 
horizontal axis and half is above it. The total length is then 2%. This value can be made any 
appropriate length by changing statements 210 and 270. |n the above example, the tics on 
the vertical axis are partially clipped because each tic's left half is outside the window. 


UNALIGNED TIC MARKS 
Here is the same program with slightly different data. 


188 PAGE 
118 VIERPORT 28, 118,20, 88 
128 WINDOW ~23,87,- ~25, 2s 
13@ REM VERTICAL axis LINE 
148 MOVE @,-25 
158 DRAW 8,25 
168 REM HORIZONTAL AXIS LINE 
178 MOVE ~-23,8 
186 DRAW 87,8 
198 REM VERTICAL AXTS TICS 
288 REM TIC LENGTH = 2% OF RANGE 
216 T=(87--23>20, 81 
228 FOR {=-25 TO 25 STEP 18 
236 MOVE 8-T, I 
248 DRAW 8+T, 1 

EXT | 


NE’ 
268 REM HORIZONTAL AXIS TICS 
278 T=(25--25)48.61 
288 FOR I=-23 TO 87 STEP i@ 
298 MOVE I,-T 
368 DRAW I,T 
318 NEXT | 
326 HOME 
33@ END 
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In the above example, the tics are aligned with the window, not the axis intersection point. 
This is caused by each FOR ... NEXT loop using the data minimum for a starting point. 
For example, the FOR statement at line 220 specifies a starting value of —25, the vertical 
data minimum. This will always produce a tic mark on the lower end of the vertical axis, at 


the bottom edge of the window. 


ALIGNMENT CORRECTION 
\f the tics are always to be aligned with the axis crossing point, the following correction can 


be used: 
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215 U2(25/10-INT(25710))418 
320 FOR I=-254U TO 28 STEP 12 


275 U=(23-10-INT( 23-10) 18 
280 FOR I=-234U TO 8? STEP 10 


(Statements 215 and 275 are added; statements 220 and 280 are changed.) 


This correction changes the starting point of each FOR... NEXT loop. The change is just 
enough to place a tic mark at the intersection point of each axis line. A more complete 
explanation of the correction follows the next example. Here is what the complete pro- 
gram looks like: 


188 PAGE 

119 VIEWPORT 28,110,28,880 
128 WINDOW -23,37,-25,25 
138 REM VERTICAL AXIS LINE 
148 MOVE 8,-25 

158 DRAW 8,25 

160 REM HORIZONTAL AXIS LINE 

178 MOVE -23,80 

186 DRAW 87, Q 

19Q@ REM VERTICAL AXIS TICS 

280 REM TIC LENGTH = 2% OF RANGE 
218 Te(87--23)%8.91 

215 U=(25/18-INT( 25/16) 2418 

226 FOR [I=-25+U TO 25 STEP 16 

238 MOVE @-T,] 

248 DRAW G+T, I 


NEXT I 
268 REM HORIZONTAL AXIS TICS 
278 T=x(25~-~-25)%8.01 
2735 U=(23718-INT( 237105416 
286 FOR I=-23+U TO 87 STEP 18 
298 MOVE I,-T 
368 DRAK I,T 
318 NEXT | 
328 HOME 
338 END 


® 
bad 
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In each FOR... NEXT loop, the value placed in U is the distance between the edge of the 
window and the first tic mark. 


GENERAL CORRECTION 


To show how this correction is applicable to the general case, the next example replaces the 
number constants with variables. Here ts a list of the variables used: 


M1 = horizontal data minimum 

M2 = horizontal data maximum 

N1 = vertical data minimum 

N2 = vertical data maximum 

X = horizontal location of vertical axis 

Y = vertical location of horizontal axis (X,Y is the crossing point of the two axis lines) 
11 = distance between tics, horizontal axis 

[2 = distance between tics, vertical axis 


Plot 50: Graphic Prog 5 - 1 1 


AXIS 


WITHOUT AXIS COMMAND 


338 


PaGE 

VIEWPORT 20,118,28,88 
RESTORE 

DATA -23.87,-25,25,80,8,18,18 
READ MisM2.NIN2.X%,¥.11,12 
WINDOW Mi,sM2,N1.N2 

REM VERTICAL AXIS LINE 
MOVE X,Ni 

DRAW X;,Ne2 

REM HORIZONTAL AXIS LINE 
MOVE M1,yY 


PRAWN M2;Y 

REM VERTICAL AXIS TICS 

REM TIC LENGTH = 2% OF RANGE 
T=(M2-M1 9X8. 91 
U=CCY=NL/E2-INTC CY-N19 71299472 
FOR I=N1+U TQ M2 STEP Ie 

MOVE X~-T, I 

DRAW X+T, 1 


EXT | 

REM HORIZONTAL AXIS TICS 
T=(N2-N1946. 91 
U=CCK-ML PTL INTCCX-M1O 11504801 
FOR I=Mi+U TO M2 STEP 11 

MOVE I,Y-T 

DRAW L,Y¥+T 


END 


(Since the output from this program is identical to the output from the one before it, no 
output is shown.) 


As stated before, the corrections included at statements 215 and 275 merely find the dis- 
tance between the edge of the window and the first tic. For the case of the vertical axis 
correction (line 215), here is a detailed description of the process: 


1. Find the distance between the axis crossing and the data minimum (in this example it 


is Y—N1}. 


2. Divide this distance by the distance between tics (in this case 12}. This quotient is the 
total number of full and partical tic intervals which will fit between the vertical data 


minimum and the axis crossing point. 


3. Subtract from this number its integer part. What remains is the distance between the 
edge of the window and the first tic, expressed as a decimal fraction of a tic interval. 


4. Multiply this fraction by the distance between tics. The product is the desired distance. 


This program duplicates the function of the AXIS command, a capability which will be 


useful when labeling tic marks. 
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MINOR TIC MARKS 


The addition of minor tic marks, |.e., marks that are shorter than the major tic marks, can 
often make a graph clearer. If the following statements are added to it, the example pro- 
gram above will draw minor tic marks. (There are four minor tic intervals for each major 
tic interval.) 


242 FOR Jel] TO I+I2 STEP I2-4 
244 MOVE X,J 

246 DRAW X*Te J 

248 NEXT J 


362 FOR J=! TO [+11 STEP 11-4 
304 MOVE J,Y 

386 DRAW J, Y+T 

388 NEXT J 
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Only statements 242 through 248 and 302 through 308 were added. For the vertical axis, 
statements 242 through 248 comprise an inner loop which draws the minor tics in the same 
manner that the outer loop (statements 220 through 250) draw the major tics. Statements 
302 through 308 serve a similar function for the horizontal! axis. 


USING RDRAW 


Another way to draw axis lines with major tic marks is to use the relative RDRAW com- 
mand instead of the absolute DRAW. All the examples so far have used DRAW. There will 
be a few instances where the use of RDRAW and RMOVE is appropriate for drawing an 
axis. However, in most cases, using MOVE and DRAW will produce a program which oc- 
cupies slightly less space in machine memory and which executes faster. The example below 
draws axis lines and tic marks using RDRAW: 


188 PAGE 

116 VIEWPORT 20,1198,28,88 

113 RESTORE 

115 DATA -23,87,-25,25,90;98,; 19;18 
11? READ Mig M2,Ni,N2,X,YsT1,l2 
i260 WINDOW M1,M2,N1,N2 

138 REM VERTICAL AXIS 

148 T=(M2-1)%8. 81 

158 URC CY-NiDT2-INTCCY-N12 129412 
168 MOVE X,Ni 

176 RDRAW 8,U 

18@ FOR I*U+N1 TO N2 STEP I2 

198 RDRAK 6,12 

208 RDRAW T,8@ 

21@ RORAW -T%2;,0 

228 RDRAW T,@ 

238 NEXT I 

248 REM HORIZONTAL AXIS 

258 T=(N2-N1>%48.61 

268 UC CK-MLOSTL-INT CO CX=Mi 7715 aT) 
278 MOVE M1,Y 

286 RDRAW U,@ 

298 FOR eee TO M2 STEP Ti 
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The next example shows that a grid covering the whole window can be drawn by repeated 
use of the AXIS command within a FOR... NEXT loop. 


16@ PAGE 

118 VIERNPORT 28,116,28,89 
128 WINDOW 8, 148,8,108 

138 FOR 128 TO 148 STEP 28 
148 AXIS 8,9,1;1 

15@ NEXT I 

168 HOME 

178 END 
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For some applications, a grid such as the one shown above clutters the window excessively. 
A grid of dots, shown in the example below, is sometimes more satisfactory. 


188 PAGE 


112 


rn 

VIEWPORT 28,118, 28.88 
WINDOW 8,140,8, 180 

AXIS 28,28 

FOR 1228 TO 148 STEP 28 
FOR Jn2@ TO 16@ STEP 28 
MOVE I;J 

DRAW I,J 

NEXT J 

NEXT I 


19@ HOME 


3 
268 
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LINEAR EXAMPLE 


Non-linear axis types, appropriate for certain transformations, can be drawn using the tech- 
niques of previous examples. The next example shows a vertical axis with tic marks drawn at 
linear intervals. 


188 PAGE 

118 VIEWPORT 20,110,29,88 

120 WINDOW 1,5,1,18 

134 REM ORAW AXIS LINES 

148 AXIS 1,8,1;1 

158 REM DRAW VERTICAL AXIS TICS WITH LINEAR INTERVAL 
160 REM TIC MARK LENGTH IS 2% OF DATA RANGE 
18@ FOR I=1 TO i@ 

198 MOVE 1,1 

208 DRAW 1+T,I 

2i1@ NEXT I 

228 HOME 

238 END 
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ADAPTED TO LOG 


An often used non-linear transformation is log to the base 10. In the example below, the tic 
marks on the vertical axis are drawn with a log interval between them. The example below 
is adapted from the example above with only a few modifications. 


188 PAGE 

L118 UIERPORT 28,118, 22,88 

120 WINDOW 1,5,LGTC1>,LGTC18) 

13@ REM DRAW AXIS LINES 

148 AAIS 1,8 

156 REN DRAW VERTICAL AXIS TICS WITH LOG INTERVAL 
168 REM TIC MARK LENGTH IS 2% OF DATA RANGE 
178 T=(5-1)%9.82 

189 FOR I=t TO 1@ 

199 MOVE 1,LGT<I) 

208 DRAW i+T,LGTCT) 

21@ NEXT I 

228 HOME 

238 END 


- “eee 
~ 
— 
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Just as in the previous example, statement 140 draws the axis lines and statements 170 
through 210 draw the tic marks. The only changes required were in the WINDOW, MOVE 
and DRAW commands (statements 120,190, and 200, respectively). In those commands, 
each reference to vertical data has been made the argument of the LGT function. These are 
the only changes required. 


LESS THAN ONE DECADE 


The previous example’s data range runs from 1 to 10, an exact decade. Quite often it is ne- 
cessary to graph data with a range of less than one decade. The simplest way to draw a log 
axis for such data is to expand the graphed data range so that it will span exactly one decade. 
(The data range of the original data remains unchanged.) The example below illustrates this 
technique. 


N1 = Actual vertical data minimum 
N2 = Actual vertical data maximum 
N3 = Adjusted vertical data minimum 


N4 = Adjusted vertical data maximum 


(The output of the program below is identical to the axis presented immediately above. For 
this reason, it is not shown.) 


@ PAGE 

@ VIEWPORT 20,119,268, 88 

i 8122800 

2 N2=5860 

3 NS*1OtINTCLGTCHL>> 

4 N4=1OFCINTCLGTCN2)9+1> 

S IF N4/N3<21@ THEN 120 

6 PRINT “ERROR: N4 > 10%N3" 


END 
12@ WINDOW 1;5,LG7(N3>,LGTCN4)D 
138 REM DRAW AXIS LINES 
148 AXIS 1,9 
tS@ REM DRAW VERTICAL AXIS TICS WITH LOG INTERVAL 
16@ REM TIC MARK LENGTH IS 2% GF DATA RANGE 
178 T=(5-1)48.82 
188 FOR I=N3 TO N4 STEP NZ 
198 MOVE 1,LGTCI) 
268 DRAW 147, LGT< I> 
218 NEXT | 
228 HOME 
230 END 
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The only additional statements required are 111 through 117. Statements 111 and 112 
specify the actual data minimum and maximum. Statements 113 and 114 adjust the range. 
Statement 115 ensures that the data is within one decade. Statements 116 and 117 com- 
prise an error exit. 


MORE THAN ONE DECADE 


The example below handles more than one decade with a similar adjustment technique: 


@ PAGE 

@ UIEWPORT 29,118,298, 80 

1 Niz28ee 

2 N2=388008 

3 NS@1OTINTCLGTCNILD)D 

4 N4e1OtcCINTCLGTCN2) 41> 

128 WINDOW 1,5,;LGTCM3>,LGTCN4> 

136 REM DRAW AXIS LINES 

146 AXIS 1,8 

150 REM DRAW VERTICAL AXIS TICS WITH LOG INTERVAL 
16@ REM TIC MARK LENGTH IS 2% OF DATA RANGE 
178 T=<(5-1)%48.02 

175 H=LGTCN2> 

i8@ FOR IJ=1O0TH TO LQT<K+1> STEP 18TH 
198 MOVE 1,LQTCI>D 

200 DRAW 14+T,LGTCT) 

21@ NEXT I 

211i H=H+1i 

212 DRAW 5,LGTC1ETH> 

213 IF H<LGTCN4) THEN 188 

228 HOME 

238 END 
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This example is identical to the one which preceded it with the following exceptions: 


Statements 115 through 117 have been removed. They are no longer needed. 


Statements 175 has been added. This sets up the beginning value for the first decade to 
be drawn. 


Statement 180 has been changed. It still draws one decade’s tic marks but its beginning 
point, ending point, and increment change during program execution. 


statement 212 has been added. This is an optional statement. !t is really just a ‘‘major 
tic” which extends across the entire graphing surface. This adds clarity to the graphed 
results. If statement 212 is removed, a normal tic will remain. 


Statement 213 checks if the axis has been completely drawn, and branches back into 
the loop if it has not. 


Statement 211 updates the starting point for the loop which draws the tic marks. 
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TWO AXIS LINES 


The polar transformation is also very useful. The simplest polar axis is just 2 crossed fines, 
dividing the graphing window into quadrants. The next example shows how a FOR... 
NEXT loop is used to draw these lines. The STEP value in the FOR... NEXT loop specifies 
the included angle between adjacent axis lines. 


108 PAGE 

118 SET DEGREES 

120 REM Ri = MAXIMUM RADIUS VALUE 
138 R1=9 

148 WINDOW -Ri,RI,-R1I,R1 

1$Q WIEWPORT 18,98,18, 90 

168 REM DRAW AXIS LINES 

17@ FOR 1=0 TO 186 STEP 90 

186 MOVE RiKCOSCI), RIXSINCGID 

198 DRAM R1IXCOSC 14188) RIXSINGI+18@> 
208 NEXT 1 

218 HOME 

22@ END 


= 
a 


In the above example, the defined window and viewport both have the same shape (square). 
tf they did not the data would be distorted, causing a circle to be drawn as an ellipse. 5 -23 
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TWO LINES AND ONE CIRCLE 
The next example adds a subroutine which can draw a circle of any given radius. 


188 PAGE 

119 SET DEGREES 

126 REM Ri = MAXIMUM RADIUS VALUE 
13@ Riz9 

148 WINDOW -R1,R1,-R1,R! 

15@ VIEWPORT 10,90,108,; 98 

168 REM DRAW AXIS LINES 

178 FOR I=8@ TO 188 STEP 90 

18@ MOVE RIXCOSCI>, RISING 

138 nett RiXCOS(1+180), RIXSINC1 +180: 


TI 
218 REN DRAW CIRCLE OF RADIUS R 
238 GOSUB 548 
HOME 


END 
5@6 REM SUBROUTINE TO DRAW CIRCLE 
518 MOVE R,@ 
526 FOR J#1@ TO 368 STEP 16 
530 DRAW RECOSC IJ), RASING JD 
348 NEXT J 
55@ RETURN 
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In the above example, the straight lines which comprise the circle are just becoming dis- 
cernible. This is due to the STEP size in statement 520 being relatively large. A smaller value 
results in a somewhat more satisfactory-looking circle which takes longer to draw. 


MULTIPLE LINES AND CIRCLES 


The example below shows the axis line loop and the circle subroutine being used to make 
additional lines and circles. 
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PAGE 

SET DEGREES 

ae Ri = MAXIMUM RADIUS VALUE 
R 

WINDOW -R1,R1,-R1,R1 

VIEWPORT 18,98,18,98 

REM DRA AXIS LINES 

FOR I=@ TO 180 STEP 38 

MOVE RIXCOSCII,RIXSINGID 

ite ices he aaa a 

sau PRAW CIRCLE OF RADIUS Rk 


GOSUB See 
R=R1¥(2/3) 
GOSUB 5@0 


R=Ri-3 
GOSUB 5@@ 
HOME 


END 

REM SUBROUTINE TO DRAW CIRCLE 
MOVE R,8 

FOR J*16 TO 368 STEP 18 

DRAW RICOS( J), RISING JD 


NEXT J 
RETURN 
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in the above example, the STEP value in the FOR... NEXT loop (beginning at statement 
170) has been changed from 90 to 30. As a result, the axis lines now occur every 30 degrees. 
The circle subroutine has been used 3 times: with the maximum radius value, with 2/3 

the maximum radius value and with 1/3 the maximum radius value. Some care should be 
exercised when choosing how many axes and circles to place on a polar graph. Too many 
lines and circles lead to a cluttering effect which can obscure data. 


USING RDRAW 


A slightly different approach will avoid this cluttering effect: a polar axis made up of just 
straight lines and tic marks. RDRAW is the most appropriate command for this purpose. 
The next example iflustrates this. 
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PAGE 
118 SET DEGREES 
120 REM Ri = MAXIMUM RADIUS VALUE 
130 Rixi4 
148 WINDOW -R1, Bahia oe 
136 VIEWPORT 18, 98,18,9 
168 ee A IS ANGLE BETWEEN AXIS LINES 


188 Ren I 1S Tic INTERVAL 


288 REM DRAW AKIS LINES 
210 REN T IS SIZE GF TIC MARKS 
228 T=R1X8.62 

236 FOR J=R TO 368 STEP A 
248 ROTATE J 

258 MOVE 8,4 

266 FOR K=I TO Rit] STEP | 
270 RDRAW I,8 

288 RDRAW 8,T 

298 RORAW 8,-TK2 

388 RDRAW 8,T 

318 WEXT K 

326 NEXT J 

336 HOME 

348 END 


Plot 50: Graphic Prag 5 _27 


AXIS 


POLAR AXIS 


5-28 


Two nested FOR ... NEXT loops draw the axes in the above example. The inner loop 
(statements 260 through 310) draws each axis line with tic marks. The outer loop (state- 
ments 230 through 320) determines how many axis lines will be drawn. 


It is desirable for the tic marks to be lined up with the pole of the graph. The easiest way 
to accomplish this is to start each axis line at the pole and draw it outward. This requires 
that the outer FOR... NEXT loop (beginning at statement 230) extend through one full 
revolution of 360 degrees rather than through one half revolution of 180 degrees, as in 

the above examples. The inner FOR... NEXT loop’s terminating value (R1+ 1 in statement 
260} ensures that the axis lines will extend outward at least as far as the maximum radius, 
R1. If the terminating value of the inner loop is specified (in statement 260} as simply R1, 
the axis lines will extend outward only as far as the last tic inside a radius of R1, an unsatis- 
factory condition. The axis lines should extend at least as far as R1 and preferably farther. 
There is no particular disadvantage in having the axis lines extend too far (other than ex- 
cessive execution time}. Any part of an axis tine or tic mark which extends outside the de- 
fined window is clipped. This is why half the axis lines in the above example have termi- 
nating tic marks and half do not. 
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198 PAGE 
118 VIEWPORT 48,398,480, 99 
MOVE 8.1 


13@ PRINT "FIRST MESSAGE" 
148 MOVE 1, 

158 PRINT SECOND MESSAGE" 
168 HOME 

1?@ END 


WINDOW O52;58:2 
RUN 


FIRST MESSAGE SECOND MESSAGE 





The two character strings above are separated by a comfortable distance. If the width of the 
window is doubled, that is if the viewport’s horizontal dimension is made to contain twice 
as many user data units as above, notice what happens. (The result is shown below.) 


WINOOW 0.4.0;4 
RUN 
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FIRST MES6886 MESSAGE 





In the above example, the distance between the starting points of the two character strings 

(one user data unit in this case) now becomes less than the length of the first string. As a 

result, the two character strings now overlap. In any graphing application, this would be 7 
unacceptable. 


The next two examples show the effect of holding the window size constant and varying 
the viewport. The first example is essentially a return to the previous case, where the strings 
do not overlap. Enter the following statements: 


118 WINDOW 0,2:852 
_et 48,986.40; 98 
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The viewport is reduced to less than half its size in the above example by entering the 
following statements: 


VIEWPORT 48,60,;49,68 
RUN 
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In the above example, the same number of user data units now occupy half the display 
space as before. The distance between the starting points of the two character strings, al- 
though being the same distance in user data space, is now half what it was before. So the 
second character string begins before the first one has ended. If the titling and labeling on 
a graph within a certain window and viewport is satisfactory, the same titling and labeling 
might be too sparse, too crowded, or totally unreadable if the window or viewport dimen- 


sions change. 
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Below is a sample function graph with a basic set of axes. 


The program will be gradually expanded as various kinds of titles and labels are added to it. 


1@@ Pace 

118 INIT 

128 DATA 8,138, 
13@ READ V1i,V2, 
148 VIEWPORT V1 
{5@ WINDOW @,PI 
16@ AXIS PI-2;5 
178 MOVE @,15 
198 FOR I=P1‘1@ TO PIk6 STEP PI-10 
198 DRAW I,SINCI>£I1415 

208 NEXT I 

218 HOME 

228 END 
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Adding a title above this graph (or any graph) is a three step process: 


1. Reserve the space for the title 
2. Properly position the beginning of the title 
3. Print the title 


Each of these steps can be performed in a variety of ways. 


In the graph shown above, the data and axes totally fil! the screen because of the VIEW- 
PORT parameters. Therefore, no characters can be printed outside the specified viewport 
area. However, the top edge of the viewport can be lowered to allow room for the title. The 
statements shown below perform that function when added to the above example program. 


5 


148 ULEWPORT UL,N2.U3,U4-3%2. 82 


* 


210 REM wd TITLE TO GRAPH 
228 AS="THIS THE GRAPHS TITLE" 
238 MOVE 3xFI,30 

24@ PRINT “K"3 

258 FOR [=1 TO LENCAS>~2 
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The MOVE command at statement 230 (above) places the graphic point in the middle of the 
horizontal data range and at the top of the vertical data range. The space between this point 
and the top of the allowable viewport (the vertical Jocation specified by variable V4) is three 
character heights. This space was reserved by the VIEWPORT command in statement 140. 
Therefore, a move up of one character height wiil vertically center a line of characters within 
that reserved space. Statement 240 does just that: moves the graphic point up one character 
space. Centering the title horizontally is just a matter of moving the title’s beginning point 
to the left by half the number of characters in the title, much as a title is centered on a 
typewritten page. The FOR... NEXT loop in statements 250 through 270 does this. It 
prints a number of backspace characters (CTRL H) equal to half the number of characters 

in the title string. The graphic point is now positioned at the correct location for the begin- 
ning of the title string. 
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How much room should be reserved for the title string? It depends mainly on how many 
lines of characters the title will have. The distance between adjacent lines of characters is 
approximately 2.82 GDU’s. This is the smallest vertical space that should be reserved for one 
line of characters. In the above example, three lines of space are reserved, one for the title, 
one for a space above the title and one for a space below the title. This is 2.82*3 or about 
8.5 GDU’s. This change is implemented in the VIEWPORT command at line 140, above. 
This change lowers the height of the viewport which actually contains the data curve and 
axes, leaving 8.5 GDU's of vertical space between the top of this adjusted viewport and the 
top of the display. This unadjusted top is specified by the variable V4 and is the highest 
allowable location for anything to appear on the screen. 


The title was positioned using a MOVE command and two control characters: CTRL K for 
moving up and CTRL H for moving left. Below is a summary of the characters which move 
the graphic point in increments of one character space. 

























ACTION: CHARACTER OBTAINABLE | HOW TO ASCII 
MOVES NAME FORM PLACE INTO VALUE 
KEYBOARD A CHARACTER 





WITH STRING 























To the right | SPACE SPACE BAR A$=" " 32 
To the left BACKSPACE CTRLH AS =“H" 8 
Down LINE FEED CTRL J A$ = "J" 10 
Up VERTICAL TAB |} CTRLK A$ = “KU 11 


Three of these characters are entered as control characters: Control H, Control J, and Con- 
trol K. 


This means that in order to enter the character into the GS, the CTRL key is used much 

like the SHIFT key. A control character is entered by pressing the desired character key 
while simultaneously pressing and holding the CTRL key. The “space” character (entered 
with the SPACE BAR) moves the graphic point to the right by 1.79 GDU’s, the distance 
which separates adjacent characters. The “‘backspace” character (which prints on the display 
as ““H’’ or ‘Control H"’) moves the graphic point to the left by the same distance. The “‘line- 
feed’’ character (which prints on the display as ““J’’ meaning ‘Control J’’) moves the graphic 
point down by 2.82 GDU'’s, the distance which separates adjacent lines of characters. The 
“vertical tab’ character (which prints on the display as “K’’ or “Control K’’) moves the 
graphic point up by the same distance. These distances are ail GDU’s and are not affected by 
the WINDOW, VIEWPORT, or SCALE statements. When manipulating the graphic point in 
this way, it must be remembered that the graphic point is moved to the right whenever a 
non-control character 1s output. 


Plot 50: Graphic Prog 


LABELS 


~ TITLING 


Centering the title within the viewport does not guarantee that the viewport is wide enough 
— to contain the title. In the following example, the viewport is narrower than the title. 


: 128 DATA 30,62, 30,60 


THIS THE GRAPH’S TITLE 
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It is easy to add a test which allows the title to be printed only when it will fit. Statement 
225 performs such a test. 


220 AS="THIS THE GRAPH’S TITLE" 
225 IF 1. 79%LENCA$)>U2-U1 THEN 290 


298 HOME 
388 END 


. 


The test at statement 225 compares the amount of horizontal space the title wil! occupy 
(1.79 GDU’s times the number of characters in A$) with the width of the viewport (V2-V 1). 
If the title is wider than the viewport, the title is not printed. 
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The same three steps are used when labeling an axis: 


1. Reserve space. 


2. Position the beginning of the character string. 


3. Print the string. 


shown below are the additional statements required to add a label to the horizontal axis. 


148 
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DATA G+ 130.9.100 


UIEWPORT U1,U2,U343%2, 82, U4-342, 92 


REM ADD HORIZONTAL AXIS LABEL 
H$="HORIZONTAL AXIS LABEL" 
MOVE 3*PI,98 

PRINT "J": 

FOR f=1 TO LENCHS$)~-2 
ce 


PRINT HS} 


HONE 
END 
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The space is reserved in the same manner as before except that the bottom of the viewport 

is raised. This is done by forming an adjusted viewport with a bottom 3*2.82 GDU’s above 
the previously specified value. In statement 140, 3*2.82 is added to V3, the third argument 
of the viewport statement. The additional statements (290 through 380} are almost identical 
to those added for the title. There is one exception: line 320. Execution of statement 310 
places the graphic point at the middle of the bottom edge of the window. In order to center 
the character line in the provided space, the graphic point must be moved down two lines. 
This is because the graphic point is at the lower left corner of the dot matrix which forms 
the characters. So statement 320 (above) outputs two line feed characters. The other state- 
ments function exactly the same as the corresponding ones which place the graph title on the 


display. 
VERTICAL AXIS LABEL 
When labeling the vertical axis, being able to print a character string vertically saves much 


space on the display. Below is an example of how this ts done. = 
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(This program can be entered and run without affecting the program being developed if the 


statement numbers are carefully chosen.) Enter the following statements: 


PAGE 

INIT 

DIM ASCIS) XSi 1d 
AS="THIS IS A TEST" 
PRINT A$ 

GOSUB 1808 
C=1938+58 

PRINT C 
AS=STRIC) 

PRINT A$ 

gg 1868 


918 END 

1008 FOR I=! TU LEN R$) 
10180 X$=SEGCA$,1,.1> 
19820 PRINT K$; "HJ" 
1830 NEXT I 

1848 RETURN 


RUN 868 


Here is the output produced: 


os 
= 
fs) 


t 
t 
H 
I 
$ 
I 
S 
A 
T 
E 
S 
T 
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The DIM command at statement 820 is optional. While its use saves memory, Its presence 
in the above example is mainly to show that X$ only has to be one character long. The 
SEG command (statement 1010) extracts a character at a time from A$. After each char- 
acter is extracted, it is printed and followed by a backspace (CTRL H) and a line feed 
(CTRL J). This same process can be done easily to numbers by using the STR function. 


The STR function (statement 880) converts the number in C into a character string. It 
can then be placed into A$ and printed vertically, just as the string ‘““THIS IS A TEST” 
was printed vertically. The subroutine which begins at statement 1000 simply prints the 
string A$ but in a vertical orientation. 


A vertical axis label can be added with the following statements: 


DELETE 880, 1848 


2 


% 


148 VIEWPORT W143x1.79,U2,U3+342. 82, 04-342, 82 


> 


e 


37@ REM ADD VERTICAL AXIS LABEL 
388 US="VERTICAL AXIS LABEL" 
396 MOVE G,15 

406 PRINT "HH"; 

416 FOR [=1 TO LENCU$)-2 
428 PRINT "K"3 

436 NEXT I 

446 FOR [=1 TO LENCUS: 

458 X$=SEG(V$,1,1) 

460 PRINT X$3 "HU"! 

478 NEXT I 

488 HOME 

49@ END 


a 
a 
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THIS THE GRAPH’S TITLE 


¥ 
E 
R 
T 
I 
v 
A 
L. 
AR 
4 
I 
3 
L 
A 
8 
E 
L 
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Labeling individual tic marks, though not difficult, requires more programming effort and 
GS memory space than is appropriate for many applications. [t is sometimes perferable just 
to print the parameters of the AXIS command somewhere within the viewport. The most 
suitable location for this information is usually just above the lower edge of the viewport, 
either to the right or left of the horizontal axis label. !f only one line is being printed, the 
space reserve specified at the third parameter of the VIEWPORT statement {line 140 above) 
need not be changed. However, in this next example, three lines are printed for the AXIS 
and tic information. So five lines of space are reserved. 


a 


148 VIEWPORT UL43K1. 79,02, U3+542. 82, U4-342, 82 


480 REM PRINT TIC & AXIS DATA 
492 MOVE 0,9 | 
SOQ PRINT "JJAKIS CROSSING = 0.0" 


518 MOVE 8,8 - 
520 PRINT “JJJX TIC INTERVAL = P1“2"5 


MOVE 0,8 ; 
546 PRINT "JJJJY TIC INTERVAL = 9"% 
ME 


55@ HO 
368 END 
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THIS THE GRAPHS TITLE 


V 
E 
R 
T 
I 
C 
R 
L 
A 
x 
I 
S 
L 
A 
B 
E 
L 


AXIS CROSSING HORIZONTAL AXIS LABEL 
X TIC INTERVAL 


Y TIC INTERVAL 





A technique which makes the graphed data easier to comprehend is to place a value cor- 
responding to each tic adjacent to the actual tic mark itself. Below is an example of this 
method, including a fist of all statements that were changed or added to the example above. 


14@ VIEWPORT U1+8x1. 792-441. 79, U5+442, 92, U4-3ke. 82 


328 PRINT "JuJ"3 


400 PRINT “HHHYUHH"S 
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V 
E 
R 
T 
if 
C 
A 
L 
A 
| 
I 
S 
L 
A 
B 
E 
L 





REM LABEL HORTZ. AXIS TIC MARKS 
FOR [=8 TO 6*PI STEP PI 

MOVE 1.8 

PRINT "HHJ"SI-PIS"XPI"S 

HEAT I 

REM LABEL VERT. AXIS TIC MARKS 
FOR I=8 TO 36 STEP 5 


MOVE 6,1 
PRINT “HE'S Is 
NEXT I 

HOME 

ERD 


THIS THE GRAPH’S TITLE 


ekP] SEP I 4¥P] SaP I 6xP] 
HORIZONTAL AXIS LABEL 


The VIEWPORT statement {line 140) is changed because more space is required for the 
labels. Eight character widths are reserved to the left (V1+8*1.79). This is larger than before 
because space must be reserved for more characters. Four character widths are reserved to 
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the right (V2—4* 1.79} to make room for the last tic label on the end of the horizontal axis. 
Five character heights are reserved below the graph. More space is needed here mainly to 
make the labels easier to read. No additional room has been reserved above the graph in this 
example beacuse nothing else has been added to that area. 


Because of these changed space allocations, the initial positioning of both the horizontal 

axis label (statement 320) and the vertica! axis label (statement 400) are also changed. {f 
they are not changed, the axis labels will conflict with the tic labels printed in statements 
480 through 590. 


Statements 490 through 520 label the horizontal axis tics. Inherent in the VIEWPORT com- 
mand at line 140 are assumptions about the amount of space occupied by these tic labels. 
One character height of space below the axis is reserved, along with four character widths 

to the right of the last tic mark on the axis. If this !ast space is not reserved, part of the last 


label is printed outside the viewport, an unacceptable situation. An assumption about the 
width of the labels is implied in two statements: in the STEP size of the FOR command at 


statement 490 (if this step size is too small, the labels will be printed on top of each other}, 
and in the number of backspaces printed at statement 510. The number I/P} will always be 
an integer in this situation because of the FOR ... NEXT loop’s beginning value and step 
size. 


The “*PI” in statement 510 (above) shows that the addition of characters to each tic label 
requires only the presence of the desired character string in the PRINT statement. The com- 
bination of a one digit integer and the *‘*PI”’ is always four characters long. Hence the two 
backspace characters (CTRL H) in statement 510. 


Unless special considerations are made in the program, it must be assumed that each tic 
label is made up of no more than a certain number of characters. Only after this assumption 
is made can the step size in the FOR statement (statement 490 in this example) and the 
label position (statement 510 in this example) be set up. The step size in the FOR state- 
ment also determines the frequency of the tic labels. If the tic mark labels are too close 
together, they become more difficult to read. 


Most of the horizontal axis tic label description applies with only slight changes to the 
vertical axis tic labels. The major difference is that the assumed maximum for the number 
of characters allowable in a vertical axis tic label has a more direct effect on the STEP size 
in the FOR statement (statement 540). The first parameter of the VIEWPORT at line 140 
was changed to V1+8*1.79 (eight character widths reserved). The assumed maximum 
number of characters for the label is three. There are several ways to ensure that the number 
of characters in a given label will not exceed the assumed maximum. These are described 
later in this section. 
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As was stated earlier in this section, the three steps required for adding characters to a graph 
are: 

1. Reserving space 

2. Positioning 


3. Printing 


The first of these three, space reservation, is now discussed. 


The technique used so far in all this section’s examples is to adjust the parameters of the 
viewport command by the appropriate number of GDU’s in each direction. This is the best 
general method because the amount of space reserved is always known exactly. Another ap- 
proach is to alter the VIEWPORT by specified percentages of the VIEWPORT height and 
width. The example below decreases the size of the viewport so that the adjusted rectangle 


is smaller than the unadjusted one. 


Unadjusted: 


VIEWPORT ¥1,V2,U3,04 


Percentage Adjustment: 


VIEWPORT UL-CU2-U1)#O. 1, 2+ CU 2-148. 1. UI-CU4-US9 FG, 1, U4 4 CUd-U3 948, tl 


Advantages: Space reservation changes with viewport size; a more pleasant appearance 
results. 


Disadvantages: The exact quantity of space reserved is unknown. 
Too little space is reserved with small viewports, too much with large ones. 


Both of these techniques have the characteristic of adjusting the size of the clipping rectangle, 
that area outside which no graphic output will appear. 


The size of the window can also be adjusted to make room for labels. This technique is not 
appropriate for the above example. However, it is described and used in the next section, 


where its use is very appropriate. 
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The second required process is to position labels within the allotted space. After the graphic 
point is placed at the location to be labeled, it must then be moved a certain number of 
character spaces to ensure that the printed characters are positioned properly. The following 
situations are among those which require this capability: centering a graph title within the 
allotted space, properly positioning a tic mark label, and centering a character over a point 
on the display. There are three ways this can be done. 


The simplest way is to use the control characters described in Sections 1 and 6: SPACE, 
BACKSPACE (CTRL H), LINE FEED (CTRL J), and VERTICAL TAB (CTRL K)}. All 
examples so far in this section have used this technique. The following program fragment 
shows its use: 


+ 


308 REM TO MOVE ONE CHARACTER SPACE HEIGHT DOWN 
318 PRINT “y"3 
32@ REN TO MOVE ONE CHARACTER SPACE HEIGHT UP 


PRINT : 
ey rian MOVE ONE CHARACTER SPACE WIDTH TO THE RIGHT 
368 REM TO MOVE ONE CHARACTER SPACE WIDTH TO THE LEFT 
378 PRINT "H"S 


Advantages: Simple to use. 
Doesn't require keeping track of WINDOW and VIEWPORT parameters. 
It is a true relative move in character distance increments. 


Disadvantages: Can only move in Increments of one entire character height or width 
(is therefore too imprecise for some situations). 


The second way is to totally rescale the graph at the point desired, use RMOVE to position 
the graphic point, and re-window to restore the original mapping situation. The example 
below moves 1.3 character widths to the left and .2 character heights below the point X,Y. 


360 WINDOW WI W2,W3,W4 

318 MOVE X.Y 

326 SCALE isl 

330 RMOVE ~1. 341.79, -8.2%2. 82 
346 PRINT “LABEL”; 

358 WINDOW WI We, WS, Ws 
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In the program fragment above, the SCALE command at statement 320 establishes a one- 
to-one correspondence between user data units and GDU'’s. It is also possible to establish 

a one-to-one correspondence between user data units and character spaces. The number of 
character widths and heights to be moved can then be used directly as arguments of the 
RMOVE command (statement 330). The program fragment below demonstrates this technique 
showing the appropriate arguments to use in the SCALE command. 


* 


290 WINDOW W1«W2,W3.W4 
310 MOVE X.Y 


328 SCALE ivt."3 912.82 
338 RMOVE -1.3,- -8.2. 
348 PRINT "LABEL": 
358 ao Wish2,W2 
Advantages: Allows movement in fractional character increments. 


Simple to use. 


Disadvantages: The previously defined window must be restored after this technique 
is used (as in statement 350, above). 


The third way is to use the window and viewport parameters to compute the number of 
horizontal and vertical user data units required for a movement on the display of 1 GDU. 
Below is an example illustrating this technique. 


386 WINDOW Wis Weebl, one 

318 CLEWPORT Ud U2, U3, 

32@ REM Si IS NUMBER oF HORIZONTAL USER DATA UNITS PER ODD 
330 Si=CW2-HWi pe CU2S-UT 

348 REM S2 1S NUMBER OF UERTICAL USER DATA UNTTS PER GBU 
358 S2=CW4-WS9 6 (04-033 

366 REM TO THE LEFT 2.4 CHARACTER WIDTHS ANB 

378 REM DOWN 1.5 CHARACTER HETGHTS 

388 RMOVE -2.445141.79,-1, 5¥S2%2. 82 


Advantages: Allows movement of fractional character increments. 
Disadvantages: Can be cumbersone if window or viewport specifications are intricate. 


Requires keeping track of WINDOW and VIEWPORT parameters. 
Can require two extra variables. 
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The third required process is to actually print the label. The most useful enhancement for 
printing is the guarantee that a number's printed image on the screen will not exceed a cer- 
tain number of characters. There are several ways to provide this guarantee. One way is to 
use the INTeger function to round the number to a specified quantity of significant digits. 
Another method is to utilize PRINT ... USING, documented in the Plot 50: Introduction 
to Programming in BASIC. These techniques can ensure that numbers of excessive length 
are never printed. An example which utilizes the PRINT ... USING command is described 
in the next section (Section 7). 
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Manually calculating the appropriate tic intervals for a given data range can be tedious. A 
preferable situation is to have a program do it. Below are two example graphs with ‘‘neat”’ 
tic intervals on the horizontal X axis calculated by the Graphic System. 


HORIZONTAL MIN & MAX = -,9023,.0068 
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HORIZONTAL MIN & MAX = 1234567, 9876543 





The program used is listed below. 


sau SAMPLE LABELED "NEAT" TICS FOR HORIZONTAL AXIS 
FF 


DATA 18,1260. 18,98,-130,136,-25,75,6 
RESTORE 

READ U1L,U2, U3, U4, WI W2 W3eW45N 
VIEWPORT V1.,U2,U3,U4 

HOME 

PRINT “HORIZONTAL MIN & MAX = "3 
INPUT W1.W2 

REM CALCULATE "NEAT" INTERVAL & EXPANDED DATA LIMITS 
GOSUB 2008 

WINDOW M1,M2,W3,W4 

AXIS O,0,Mi.W3 

AXIS O,0eN2.W4 

AXIS $,@ 

GOSUB 3088 

END 
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2088 REM COMPUTE "NEAT" TIC INTERVAL FOR HORIZONTAL AXIS 
2016 REM R="RAW" TIC INTERVAL 

2826 R=(W2-W1D“N 

2036 REM S=LARGEST INTEGER POWER OF TEN STILL SMALLER THAN RAW INTERVAL 
2840 S=1OTINTCLGTCR)> 

2858 REM T= RAW INTERVAL ~« NEXT SMALLEST POWER OF TEN 
2668 T=R/S 

2078 IF T>2 THEN 2118 

2686 IF T=1 TREN 2198 

2690 S=2kS 

2188 GO TO 2150 

2118 IF ie THEN 2148 


$=5% 
2136 GO TO 2150 
2148 S=18%S 
2156 REM S="NEAT" TIC INTERVAL 


2160 REM ADJUST DATA MINIMUM 
2178 MIZINTCWi’S> 

2188 MIsStCMl+2> 

2198 IF MI<Wi THEN 2228 

2208 MI=Mi-S 

2218 GO TO 2198 

2228 REM FOUND ACJUSTED MINIMUM 
2238 REN ADJUST DATA MAXIMUM 
2240 M2=INTCW27S) 

2258 M22S*CN2-2) 

2268 IF W2<M2 THEN 2298 

2278 M2=N24+S 

2288 GO TO 2268 

2298 REM FOUND ADJUSTED MAXIMUM 
2388 RETURN 


2938 REM LABELING ROUTINE FOR HORIZONTAL AXIS 
3088 S7=M1 

3818 S8=W3 

3828 S1i=M2-S-2 

3838 Se=S?4+S 

3848 IF S?>S1 THEN 3126 
3858 MOVE S?7,S8 

3660 AF=STRIS?) 

3678 FOR Q@=1 TO LENCAS > ~2 
3889 PRINT “H"5 

3698 NEXT Q 

3188 PRINT S$? 

3116 GO TO 3038 

3128 RETURN 


A subroutine beginning at line 2000 calculates an appropriate tic interval for the horizontal 
axis based on the three parameters: the horizontal data minimum (assigned to variable W1), 
the horizontal data maximum (assigned to W2}, and the maximum number of tic marks de- 
sired (assigned to N). The tic interval calculated is a multiple of 1, 2, or 5. Tic intervals 
calculated in this manner are referred to as “‘neat’’. N ts initialized to 6 in the READ state- 
ment at line 140. Lines 2020 through 2150 calculate a tic interval which will result in no 
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more than N tic intervals being drawn. This interval is passed back to the main program in 
variable S. Lines 2160 through 2220 adjust the data minimum downward so that the new 
data minimum will be an integer multiple of the tic interval. This adjusted data minimum is 
passed back in variable M1 leaving the original data minimum, W1, undisturbed. Similarly, 
lines 2230 through 2290 adjust the data maximum upward, passing the new data maximum 
back in variable M2. 


After the tic interval, adjusted data maximum and adjusted data minimum have been deter- 
mined, the window can be defined with the WINDOW command (line 210). Note that the 
arguments for the horizontal range of the WINDOW command are the adjusted data mini- 
mum (M1) and the maximum (M2), not the original data minimum (W1) and maximum 
{W2). The two AXIS statements at lines 220 and 230 simply draw a box around the window 
to show that no tic labels extend outside it. The AXIS statement at line 240 draws the axis 
with the “neat” tic interval S. Then the subroutine beginning at line 3000 is catled to label 
the horizontal axis. 


This routine to label the tics requires the following information: the adjusted data minimum 
(M1) to know where to start; the adjusted data maximum (M2) to know where to stop; the 
tic interval (S): and the vertical data minimum (W3) to know where to position the labels 
vertically. All other variables used are scratch variables. 


The subroutine positions the labels with the same technique that was used at the end of the 
previous section. Line 3050 places the graphic point directly below the tic to be labeled. The 
value to be printed is converted to a character string using the STR function. Then a FOR... 
NEXT loop (statements 3070 through 3090) outputs a number of backspaces equivalent to 
half the number of characters in the label to be printed. if a situation arises where the labels 
are too close together and begin to overlap, changing N to a smaller number will cause fewer 
labels to be printed, reducing the chance of overlap. In the above program, space for the 
labels is reserved by expanding the window. The entire program requires no access to the 
viewport parameters. If the viewport is specified from the keyboard just prior to program 
execution, there is no need for any VIEWPORT command (such as the one at line 140) in 
the program at all. 


For certain applications, tic labels with a normalized scientific notation are desirable. The 
example below shows such labels. 
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“NEAT” TIC INTERVALS 


HORIZONTAL MIN & MAX = 89E7, 201E? 





The program which generated these !abels is identical with the previous example program, 
listed above, with the exception of the labeling subroutine beginning at statement 3000. It 


is listed below. 
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REM LABELING ROUTINE FOR HORIZONTAL AXIS 


S72M 1 

S8=W3 

S32ABS(M1+S) MAX ABS (MZ-S) 
S32INT(LGTCS3)+1,6E-8> 
S2=18t-S3 

Si=M2-S/2 

SPES?7+S 

IF S7oSt THEN 3128 

MOVE $7,S8 

PRINT "HH" 

PRINT USING “-D.2D,S"iS?#52 
GO TO 306e 

IF S3=@ THEN 3168 

$r=5i 

MOVE Sr,S9 

PRINT USING “2A. +FD.S*2" E"5S3 
RETURN 
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The required input variables are the same (M1, M2, W3, S). But the way they are handled is 
slightly different. Statements 3020 through 3040 calculate a normalizing factor, used when 
the tic values are printed (statement 3100) and to determine if an exponent needs to be 
printed (statement 3120 through 3150). The example program above prints the tic labels 
with a PRINT USING command. This guarantees that the tic labels never exceed a certain 
number of characters in length (4 + 1 space in this example). Therefore, the labels can be 
positioned properly with a constant number of backspaces. Statement 3090, which outputs 
two backspaces, replaces a FOR ... NEXT loop. In addition, the task of reserving space for 
the labels is simplified by knowing for certain how many characters comprise each label. 


The next example extends the techniques of the above example to the general case of 
labeling tics on both the horizontal and vertical axes. 


WINDOW PARAMETERS = -150,200,-.057,.82 
NUMBER OF TICS - HORIZONTAL & VERTICAL AXIS = 5,? 
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108 REN LABELED "NEAT® TICS - GENERAL CASE 
PAGE 


128 PRINT "HINDOW PARAMETERS = "3 

130 INPUT Wi. We, Wk3.W4 

148 PRINT "NUMBER OF TICS - HORIZONTAL & VERTICAL AXIS = "3 
{S@ INPUT Ni.N2 

168 VIEWPORT !8,.120,10,98 

178 BIM Pcs 

186 Pc lo=Wi 

198 Pc 2 .=W2 

288 Pi Z>=Ni 

218 PCSd)=W3 

228 Pc ed=h4 

238 PC? =N2 

248 REM CALCULATE WHEW LIMITS AND INTERUALS 


PS=% 
268 GOSUB 2888 
PS=? 


“7 

288 GOSUB 2008 
298 WINDOW PilasPCZasPiSi Pied 
SOB AXIS PC3IsPC? SsPCLISPE CSI sPCQI4P C7?) 
318 REM LASEL THEM 
328 PS=4 
338 A$="HHH" 
34@ GOSUB 2008 
358 PS=8 
368 AS="" 
378 GOSUB 3606 

HOME 


398 END 


BBG REN FCPS) = MINIMUM NO. OF TICS 
2818 PLSCPCPS-1)-PCP5-2) “PCPS 

2620 ae 

2838 PisPi- 

eed IF Pise. “THEN 28su 


e858 IF Pi=1 THEN 2128 
2868 P2=24P2 

2878 GO TO 2128 

2886 IF Pl>5 THEN 2118 
2098 P2=5#P2 

2180 G0 TO 2128 

2118 P2=10%P2 

2128 REM ABJUST DATA MIN 


2138 PLEINTCPCPS§-239~P2) 

2146 PS=P2kCPi+25 

C158 IF P3<PCPS-2)9 THEN 2186 
2168 PI=P3-P2 

21°6@ GO TQ 2156 

else PCPS-2)=P2 

219@ REM ADJUST DATA MAX 
22080 PI=INTCPEPS-~1)-P2) 

2219 P3=P2k(P1-2) 

2220 IF PCPS-1)9<P3 THEN 2256 
2230 P3=P3+P2 

2248 GO TO 2226 

2258 PCPS-1)=P3 

2268 REM PCPS=ADJUSTED TIC INTERVAL 
2278 PCPS 2=P2 

2288 RETURN 
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3880 REM LABEL AXIS 

3818 P4=P<P§-13 

3820 Pc 4r=Pitd 

3038 PCS=P\S9) 

3848 PS=ABS(PCPS-3)4+P4>) MAX ABSCPCPS-23-P4) 
S858 PS=INTCLGT(P3 +1. 8E-3) 

3868 P2=1at-P3 

3878 PL=PCPS-2)-P4-2 

3O8Q PLPSD=EPC PS >+P4 

S898 IF PCPS)>P1 THEN 3148 

3i8B MOVE PC 4),PCE3 

3118 PRINT Ass 

3128 PRINT USING "-D. 2B, S° i PCPS >sP2 
3138 GO TO 3888 

3148 IF P3=@ THEN 3188 

$158 PCPS>=P! 

3168 MOVE PC4),.P¢8) 

3178 PRINT USING “2a,+FD,S"2" E'sP2 
31868 RETURN 


Neither of the routines in the program listed above requires any knowledge of what the view- 
port has been set to. The VIEWPORT statement at line 160 could be deleted and the view- 
port set from the keyboard just prior to program execution. (An INIT command anywhere 
in the program would restore the viewport parameters to the default, full size, values.) 

Lines 120 through 150 cause the data limits and the desired number of tics to be input from 
the keyboard. Statements 170 through 230 set up array P, which is used to pass values to and 
from the routines. (The values assigned to variables W1, W2, W3, W4, N1, and N2 remain un- 
changed after they are input.) Array P is set up to allow a subroutine to be usable for both 
the horizontal and vertical axes. The subroutines listed in the example above perform func- 
tions identical to those in the first two examples of this section. They have been changed 
only to allow them to be used on both the horizontal and vertical axes. 


The routine beginning at line 2000 affects only the variables P(P5), P(P5-1}, and P(P5-2). 
All other variables in the routine are used for scratch purposes. (The values they contain are 
of use only while the subroutine at statement 2000 is being executed.) When the routine at 
statement 2000 is called with P5 equal to 3 (as it is at statement 260), the routine affects 
only the elements P{1), P(2), and P(3) tn array P. When the routine is called with P5 equal 
to 7 (as it is at statement 280), the routine affects only P(5), P(6), and P{7}. When entering 
the routine with P5 equal to 3, meaning that all data values pertain to the horizontal axis, 
the subroutine uses P{1) as the original data minimum, P{2) as the original data maximum 
and P(3) as the specified number of tic marks. The routine uses these same locations to re- 
turn the values it calculates. It returns the adjusted data minimum in P(1), the adjusted data 
maximum in P(2), and the “‘neat”’ tic interval in P(3). Similarly, when called with P5 = 7, 
the routine returns the adjusted data minimum P(5), the adjusted data maximum in P(6), 
and the ‘‘neat”’ interval in P(7). These values are then used directly in the WINDOW com- 
mand in line 290 and the AXIS command in statement 300. 
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The routine beginning at line 3000 has data passed to it in a similar manner. There are, how- 
ever, two significant changes. The labeling routine at 3000 prints A$ (statement 3110) be- 
fore printing each label (statement 3120). A$ contains positioning characters as needed: 

three backspaces for horizontal axis labels, no characters at all for vertical axis labels. The 
other difference is that P(4) and P(8) are used to position each label, with P(4) being the 
horizontal position and P(8) being the vertical position. The variable PS determines which 

of them is updated in the loop formed by statements 3080 through 3130. This scheme, which 
may appear complex, allows very efficient use of memory space for both data and program 
statements. 


The next example (shown below) is identical to the above example with the following 
exceptions: lines 140 through 160, line 200, and line 230. 


WINDOW PARAMETERS = 
UIEWPORT PARAMETERS = 
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1BQ REM LABELED "NEAT" TICS - GENERAL CASE 
118 Pro 


128 PRINT "WINDOW PARAMETERS = *: 

136 INPUT W1,W2,WS,K4 

148 PRINT "VIEWPORT PARAMETERS = "5 

158 INPUT U1,V2.U03,U4 

168 VULEMPORT U14+6%1.8,U2, U343%2.8,04 

170 DIM Psd 

188 PC1>=h1 

198 Pc 2>=n2 

208 PCSI=INTC CU2-CUL4641,.899°¢9%1.893 MAS 
218 PCS =h3 

228 Pi 6>=W4 

22GB PCPIZINT( CU4-CU34342.892 0382.89) MAX | 
248 REM CALCULATE NEW LIMITS AND INTERVALS 


P5=3 
260 GOSUB 2000 
278 P5=? 
28@ GOSUB 2208 
298 WINDOW P(1)sP(29P (59 «PCS? | 
30 REN AKL PC3dePCPISPCLIEPC 39, PCSI+PC?) 
31@ AXIS PC3),PK?) 
32@ REM LABEL THEM 
338 P5=4 
348 AS="BHH.I" 
356 GOSUB 3800 
36@ P5=8 
378 A$="HHOEH" 
386 GOSUB 3888 
396 HOME 
468 END 


These changes allow the program to determine the number of tic labels which will fit into 
the specified viewport. The number of desired tics on each axis does not have to be entered. 
After the viewport parameters are entered in line 150, the viewport can be set up. As in 
examples in Section 6, the effective viewport size is reduced to make room for the labels. 
The viewport’s horizontal minimum is increased by 6 character widths. 


168 VIEWPORT Ui46%1.8,U2,094+3%2,9,U4 


This adjustment is based on the assumption that the vertical axis labels will be no wider 
than 5 characters. The viewport’s vertical minimum is increased by 3 character heights. 


168 VIEWPORT Uitext. 8, U2, 0S+3%2,38.U4 


This adjustment is based on the assumption that the horizontal axis labels will occupy no 
more than one character line. 
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Line 200 determines the number of horizontal axis labels which will comfortably fit within 
the specified viewport width. It does this by dividing the effective viewport width 

[ (V2 — (V1+6*1.8)) } by the horizontal space taken up by 8 characters [8*1.8]. The 
figure 8 characters is used to ensure that the labels will not be too close together, causing a 
cluttered appearance. The MAX 1 in lines 200 and 230 prevents the number of labels re- 
quested from being less than 1, an event which the algorithm in the routine at 2000 is not 
prepared to handle. 


Line 230 performs a similar task for the vertical axis labels. However, in this line, the effective 
viewport height is divided by 3 character heights to determine the appropriate number of 
labels. if the complete program is run with a variety of viewport sizes specified, the smaller 
viewports will produce fewer labels as appropriate. 
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Below is a sample graph of dashed lines. 


XtsYL = -158,0 
K2,Y2 = 158,-5@ 
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.Y1 is located by the ‘’1” to the left of the window. The point X2,Y2 is 


located by the “2” to the right of the window. The routine at statement 1000 draws a 
dashed line from X1,Y1 to X2,Y2, subject to the appropriate clipping performed by the 


window and v 


180 


1238 
1248 
i256 
oo 


jewport. 
Sree DASHED LINE PROGRAM - GENERAL CASE 
ale’ 


RESTORE 

CATA 3B, 160.19;80,-1980, 100.-198, 1498 

READ Ui s U2, V5) U4 Wt Wer W3sW4 

VIEWPORT Vi1,U2 eae 

WINDOW WieW2, Wah 

REM DRAW A DASHED LINE FROM X1,Y13 TO &k2:Y¥2 
PRINT "X1;Y¥1 3 "3 


INPUT X1,Y1 

PRINT ee z"S 

INPUT X2 

AXIS 23.2 5° 

REM DRAW BOX RROUND VIEWPORT 


AXIS JG WL WS 
AXIS Q,8.W2.W4 
MOVE Ke. Y2 
PRINT "2H°S 
MOVE X11, 491 
PRINT "“1H*5 
GOSUB 1868 

END 


REM Si IS HUMBER OF HORIZONTAL USER DATA UNITS FER GBU 
Si=(W2-W127CU2-01 > 

REM S2 IS NUMBER OF VERTICAL USER DATA UNITS PER GDU 
S$2=(W4-W3) “CU4-U2) 

REM FIND HORIZONTAL DISTANCE IN GOU’s 

D1=(X2-X1) “$1 

REM FIND VERTICAL DISTANCE IN GOU’s 

De2=(¥2-%1)7S2 

REM D IS DISTANCE BETWEEN POINTS IN GDU%s 
O=SOR(D1t2+D2t2> 

IF D=@ THEN 1342 

REM DESIRED DASH LENGTH IN GDU’s IS L 


Le] 

REM FIND HORIZONTAL COMPONENT OF DASH IN USER UNITS 
Ui=LeCDL“DIaSI 

REM FIND VERTICAL COMPONENT OF DASH IH USER UNITS 
H2aLa(D2-D>*S2 

MOVE X1;¥1 

REM CURRENT HORIZONTAL POINT IS H 


H=x1 

REM CURRENT VERTICAL POINT IS ¥ 
U=¥1 

REM CLEAR FLAG 

F=Q 

REM Oeaee LOOP TO DRAW GASHED LINE 
GOSUB i3 

IF Fal The 133 


278 DRAW HY 
1580 GOSUB 1358 
{298 IF F=1 THEN i338 
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1308 MOVE H.V 

1318 GO TO 125e 

1328 REM DONE _~ 
1338 DRAW 42,2 


RETURN 
1358 REM SUBROUTINE TO CHECK IF DONE 
1366 H=H+Ui 
1378 VY=Y42 
1388 IF ABSCH-KX1i) >ABS(K2-K1) THEN 1418 
1390 IF ABSCU-Y1>>ABSCYZ-Y1> THEN 1412 
1489 ae 
1426 RETURN 


In order to draw the dashed line, the routine requires the following information: the view- 

port parameters {in this example V1, V2, V3, V4), the window parameters (in this example 

W1, W2, W3, W4), the desired dash length in GDU’s (L in this example), and, of course, the 

beginning point (X1,Y2) and ending point (X2,Y2) of the dashed line. The subroutine is log- 

ically divided into two sections. The first section (from statements 1000 through 1160 in the 

above listing) uses the dash length, window and viewport information to calculate the hori- = 
zontal and vertical components of the dash in user units. Once these two components are 

known, the dashed line can be drawn in user space, which makes the line subject to clipping. 


This is very desirable, as the sample dashed line graph (above) shows. The second logical por- 
tion of the routine, beginning at statement 1170, is a!oop which actually draws the dashed 
line. Since both the move and draw segments of the !ine need to be checked to see if the -- 
ending point of the line has been reached, this checking function has been placed in a sub- 
routine beginning at line 1350. The variable F is a flag to tell the main loop in the routine if 
the ending point has been reached. 
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The Graphic System can be used to edit data graphically. The program listed below shows 
a method for performing this task. 
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3 G0 TO 18a 

4 RMQUE @,P2 

§ RETURN 

8 RMQVE -P1,0 

9 RETURN 

f2 RMOVE P1,8 

13 RETURN 

16 GO TO 268 

28 REM BEGIN EDITING 

21 GOSUB 1088 

22 PRINT @32,24:5"1"3 
Q 22 


URN 

36 REM FIND POINT 

37 GOSUB 2806 

38 RETURN 

4@ REM CHANGE POINT 

41 GOSUB 3008 
RETURN 

44 RMOVE 6, 18%P2 
RETURN 

48 RMOVE ~10%P1,0 
RETURN 

32 RMOVE 16%P1,8 
RETURN 

64 RMOVE 8,-18kP2 
RETURN 


) 

97 REM USER DEFINABLE KEYS: 

98 REM UP LEFT RIGHT REGRAPH 
99 REM DOWN FIND 


188 INIT 

118 SET KEY 

128 REM GENERATE SAMPLE DATA 
138 BIN ASE) 

148 Mi=1.6E+388 

15@ Me=-1.8F+308 

168 Ai1)=18 

178 FOR [=2 TO 5¢ 

186 ACT) =SERND(-1)9454+141.5 
i938 IF [<>4@ THEN 216 

288 AC4B)2R¢39)9 72 

210 Mi=Ail MIN ACID 

228 M2=M2 MAX ACT) 

236 NEXT I 

248 SEE GRAPH BATR 

5 

268 VIEWPORT 16.125,16.35 
278 WINDOW 0,51,9,198 

288 AXIS 5,16 

296 €12=51°120%1.55-2 

388 €2=100790%1.88-2 

31@ FOR I=1 TO 5¢ 

326 MOVE 1-C1,A¢1)-Ce 

336 PRINT “+H"% 

348 NEXT I 

358 HOME 

368 END 


Pu 
ey 
wm 
oO 


EDIT 
CHANGE 
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1086 REM BEGIN EDITING 

1018 REN CALCULATE .5% OF WINDOW IN EACH DIRECTION 
182@ Pi=50k8. 885 

1638 P2=100%8. 885 

1040 REM INITIAL PLACEMENT OF POINTER 

105@ GIN Gl,Ge 

1960 MOVE G1,G2 

1678 REM CHANGE FONT 

18380 PRINT @32,18°5 

1096 RETURN 


2886 REM FIND POINT 

2018 GIN G1,G2 

2828 0=1.8E+388 

2830 REM SEARCH DATA POINTS FOR CLOSEST FIT 
2048 FOR [=1 TO 38 

2058 DL=SQR(CGiI-]>)t2+¢G2-ACT It2) 

2068 IF D1i°oD THEN 20880 

2678 D=D1 

2086 NEXT I 

2098 REM TEST TO INSURE POINT REALLY FQUND 
2188 J=INT(Gi+8.5> 

2116 IF J<i OR J25Q THEN 2158 

2120 IF ABS<J-G12>Z4P1 OR ABSCG2-AC J» »>2KP2 THEN c1se 
2138 REM POINT FOUND 

2148 RETURN 

2158 REM POINT NOT FOUND. RESTORE DEFAULT FONT 
2168 St @32,1826 


3808 REN CHANGE POINT 

3918 REM RESTORE FONT 

3828 PRINT #32. 15:8 

3830 HOME 

3adO PRINT "CHANGE AC"E IIT)” 
3859 PRINT "FROM “sacl 

3@68 PRINT " TO "5 

3878 INPUT ACID 

3888 END 


Typing RUN causes lines 100 through 360 to be executed. Lines 140 through 230 fill array 
A with sample data. The minimum and maximum values are placed in M1 and M2, respec- 
tively. Lines 190 and 200 cause an obviously out of line data point to be placed in A(40). 
Lines 250 through 340 graph the data in array A, marking the location of each data point 
with a “+’’. In order to be centered over the data point, each “+ is offset by a vertical 
distance equal to one half a character height and a horizontal distance equal to one half a 
character width. Line 290 calculates the distance, in horizontal user units, equal to one half 
character width. It divided the horizontal data range (51 in this example) by the width of the 
viewport in GDU’s and multiplies the quotient by the character width in GDU’s divided by 
two (1.55/2). The result, placed in C1, is half a character width in user units. The vertical 
offset distance is determined in a similar manner. 
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When the graph is drawn (shown above), it is seen immediately that a point is out of ap- 
parently normal range. In some applications, it is useful to select this data value for editing 
by merely pointing at it. Pressing user definable key 5 begins an editing mode which allows 
this to be done. 


Whenever the editing mode is entered by pressing key 5, the arrow pointer appears on the 
display at the last position of the graphic point. After the program graphs the data in array 
A, the cursor is placed in the home position. If key 5 is pressed then, the pointer will appear 
in the home position in the upper left corner of the display. User keys 1, 2, 3, and 6 change 
the pointer’s position. Key 1 moves it up; key 6 moves it down; key 2 moves it to the left; 
and key 3 moves it to the right. When each key is pressed in lower case, the pointer is moved 
5% of the window size in the appropriate direction. When the key is pressed in upper case, 
the pointer is moved 5% of the window size in each direction. Holding any key down enters 
commands into the GS faster than they can be processed. It is best to move the arrow by 
tapping the desired key repeatedly, rather than by holding the key down. When the pointer 
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is as close as possible to the data point to be changed, press user key 9. This directs the pro- 
gram to search all the data values to determine if the pointer is acceptably close to a data 
value in the array. The pointer disappears while this search is executed. If the program fails 
to find a data value within 1% of the data ranges to the pointer, the program stops execution 
and the flashing rectangular cursor appears at the arrow’s last location. !f an acceptable 
match is found, the arrow reappears. Key 10 is now pressed to change the selected array 
element. In the upper left corner of the display ts printed the index of the element selected, 
the element’s current contents, and a request to input a new value. Pressing user key 4 re- 
graphs the data, showing the position of the changed data point. 


In several places, the program uses a non-default display secondary address. The secondary 
address 18, as used in lines 1080, 2160, and 3030, tells the display that one of the 6 char- 
acter fonts in the GS display will be invoked. 


The font determines what characters are actually printed on the display when certain ASCII 
character codes are sent to it. The normal font, called font number zero, is invoked with 
the following command: PRINT @32,18:0. There are six fonts, numbered 0 through 5. The 
arrow pointer, ASCII character code 124, printed via font 5. Font 5 is invoked by line 1080 
when the data edit mode is entered. 


The secondary address 24, used in line 22, tells the display to ‘‘refresh”’ a character. The 
statement PRINT @32,24: “A” causes the character A to be written but not stored per- 
manently on the display. Each time that statement is executed, the character ’’A”’ is refreshed 
on the display for about % second. If the character “A” is to be observed for more than % 
second, the statement PRINT @32,24; ‘‘A’’ must be executed repeatedly. Since line 22 is 
executed repeatedly, the refreshed arrow character remains steadily visible on the display but 
does not leave any trace when its position is changed. Only the first character of the string 

in the PRINT statement is refreshed. For example, the statement PRINT @32,24: “XYZ"’ 
will cause only the “’“X” character to be refreshed. 


Any of the data editing functions described in Section 2 can be incorporated into a program 
of the type listed above. In order to keep this example as simple as possible, only the “‘change’ 
function is implemented. 
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Cross-hatching is a useful technique for highlighting data in certain applications. The clipping 
capability of the Graphic System makes this an easy task. A viewport corresponding to the 
area to be cross-hatched is set up. A FOR... NEXT loop is then executed, which covers 

the entire display with diagonal lines. The only lines which appear are those which fall in- 
side the viewport. The lines which fall outside the viewport are clipped and do not appear. 
The example below shows how this is done. 
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B INIT 

BOIN Pi4,2) 
A VIEWPORT 8,130,8,168 

QO WINDOW 8. 1300.6, 1809 

8 MOVE $00, 288 

OB INPUT O32. 242 PC1,19, P01, 2) 
1318 RDRAW 8,490 

1928 INPUT 832,245 P C2. 1a Pt 2s2) 
1930 RDRAW 268.8 

1948 INPUT @32.24:P¢3,19.P¢03.2> 
1850 RDRAW 8,-408 

1868 INPUT @32,24:P¢4,13,PC4.2> 
1078 RDRAW -268,80 


1080 VIEWPORT Pc Ladd ePCZeldsPC1,20PC 


1098 MOVE 8,86 

1188 SCALE 1-1 

1118 FOR 1=-18@ TO 180 STEP 4% 
Li2@ MOVE 8,1] 

113@ DRAW 186,1+166 

1148 WHEXT | 

1158 WINDOW 6, 1680.0, 1008 
1168 VIEWPORT 9, 108,0, 160 
11°68 HOME 

1186 END 


Ps 7 > 
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This example fills a rectangle 200 units wide by 400 units high with diagonal lines. The 
lower left corner of the rectangle is located by the MOVE command in line 990. In the 
above example, it is specified to be (800,200). The example has five functional sections: 
initialization (lines 950 through 990), placing the actual display location (in GDU’s) of each 
corner of the rectangle into each row of the array P (lines 1000 through 1080), setting up 
the proper scale and viewport for the diagonal lines (lines 1080 through 1100}, drawing the 
diagonal lines (lines 1110 through 1140), and restoring the original window and viewport 
specifications. Each section is now discussed in more detail. 


The first section dimensions array P, sets up the desired window and viewport, and jocates 
the lower left corner of the rectangle by placing the graphic point there. 


The second section draws the rectangle while storing the actual display location of each 
corner into a row of array P. The command used to determine the actual display location 


of the graphic point is INPUT @32,24: X,Y. This command is analogous to the GIN com- 


Plot 50: Graphic Prog 


ENHANCEMENTS 


CROSS-HATCHING 


mand. The major difference between the two commands is that GIN places the position 

of the graphic point in user data space into the two target variables. INPUT @32,24: X,Y 
places the actual display !ocation of the graphic point in GDU's into the two target vari- 
ables. Executing either of these commands is similar to asking ‘where is the pen?'', except 
that the display and not a plotter is being addressed. GIN returns the locations of the graphic 
point in user data space; INPUT @32,24: returns the actual physical location of the graphic 
point in GDU's, the units used to designate specific locations on the display. 


The third section sets up a viewport which coincides with the rectangle which has been drawn 
(line 1080). A SCALE command is executed to ensure the diagonal lines always appear at 

the same slope with the same distance between them, regardless of what viewport is defined. 
In this case, VIEWPORT’s only function is to specify where the lines are to be clipped. Before 
a scale command can be executed, the graphic point must be moved to the place where the 
origin or (0,0) point of the new coordinate system is to be located. The MOVE 0,0 at line 
1090 does this. It places the graphic point at (0,0), the lower left corner of both the window 
and viewport. However, because of the revised VIEWPORT command line 1080, the point 
(0,0) is now at the lower left corner of the box drawn on the display. (This can be observed 
by temporarily inserting the following statement into the program: 1095 END. When the 
program stops execution just after line 1090, the flashing cursor will appear at the lower 

left corner of the box drawn on the display, not at the lower left corner of the whole 
display.} When the SCALE command is executed, the new origin of user data space, i.e., the 
point (0,0), will be located at the lower left corner of the box drawn on the display. The 
diagonal lines drawn by the FOR... NEXT foop at lines 1110 through 1140 are drawn 
identically, regardless of the size or location of the box. Statements 1150 and 1160 restore 
the window and viewport to their original specifications. 


The next example program, listed below, is identical to the histogram program in Section 3. 


Plot 50: Graphic Prog 7 ae 4 1 


ENHANCEMENTS 


CROSS-HATCHING 





7-22 


160 ee 
118 PAGE 
128 Dim ACT@I P0429 
13@ R ee 

148 DATA 1280.18.90 
ae nai UL 03,03, U4 


178 HB 

18@ FOR J=1 TO 58 
198 R=RND(-2) 

260 IT=INTCRK10+1> 
218 ACT =zRC T+) 
220 M=M NAX ACID 


238 NEST J 
248 VIEWPORT U1.U2,.U3,U4 
258 K1=0 


280 W4=NX 
2598 WINDOW tg W2, H3, 4 
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380 AXIS 151 

318 FOR K=1 TO 16 
320 MOVE K-1,8 
336 GOSUB 1880 
346 NEXT K 

358 HOME 

36@ END 


1888 INPUT B32,24:Pi1,1),P¢1,2) 

1818 RDRAW B.ACK) 

{828 INPUT Boe f4 EPC Ze 1d P22) 

1638 RDRAW 1,8 

1846 INPUT 832.24: P¢3,1).P63.2) 

1658 RDRAW O.-ACK)? 

1960 INPUT 832.24: P64, 1>5P64,2) 

1878 RDRAW ~!,8 

{686 UIEWPORT POL LPS LPL SP 2s 22 


1s 
1118 FOR [=-100 TO 1008 STEP 5 
1120 MOVE 6,1 
1138 DRAW 10G.1+{9e 
1148 NEXT I 
1158 KINDOW Wi,W2.W3.W4 
1166 VIEWPORT UiL.U2,03,04 
1178 MOVE BACK) 
1188 RETURN | 


The major change is that the vertical bars which comprise the histogram are cross-hatched 
with diagonal lines. The subroutine beginning at line 1000 is the same program which was 
just discussed, except that the location and height of each vertical bar is determined by a 
data value in array A. This shows that a cross-hatching capability is easily added to a program 
by including it in a subroutine. 
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Drawing pictures with the GS is slightly different from representing data. When drawing a 
picture, it is important that the horizontal and vertical scale be equal. If they are not, ob- 
jectionable distortion results. The aspect ratio of a rectangle is the quotient of its width and 
height. Whenever the aspect ratios of the window and viewport differ, the implied scaling 
factors, horizontal and vertical, will differ also. This was illustrated in Section 1. When 
drawing a picture, the limits in the WINDOW command must be changed whenever the 
viewport aspect ratio changes. If the SCALE command is used, the viewport determines 
only where the picture will be drawn on the display and what the clipping limits will be. 
With SCALE, the defined viewport has no direct influence on what the scale factors are. 
The following program serves as an illustration of this characteristic. 


168 INIT 

11@ PAGE 

128 RESTORE 

136 DATA 8,138.8, 180 

144 READ Vi, U2,U3,U4 

15@ VIEWPORT U1,U2.U3,04 

a Ae ORAW A BOX AROUND THE UIEWPORT 

?*8 AX 

186 AXIS 8,6, 138, 168 

196 REM CENTER GRAPHIC POINT IN VIEWPORT 
206 MOVE 65,58 

218 REM SPECIFY SCALE «DATA UNITS PER Ubu» 
220 SCALE 131 

1986 REM DRAW A CIRCLE OF RABIUS 28, CENTERED AT (6,0) 
1818 SET DEGREES 

1828 MOVE 28,8 

1938 FOR I=10 TO 368 STEP 18 

1848 DRAW 204COS(I>,204SINCID 

185@ NEXT I 

1968 END 


The INIT statement at line 100 sets up the default window and viewport. Statement 150 
changes the viewport, but the window remains defined as it was in the INIT statement: an 
implied WINDOW 0,130,0,100. The two AXIS statements draw a box around the viewport 
so that its limits may be seen in the example programs. When the SCALE command Is ex- 
ecuted, the entire mapping transformation between user data space and screen space Is re- 
defined. The new origin, or (0,0} point of this coordinate system is defined to be the posi- 
tion of the graphic point when SCALE is executed. The clipping limits of the viewport, that 
is, the locations in user data space of the viewport edges, are therefore implied by the posi- 
tion of the graphic point relative to the viewport at the time the SCALE command {s exe- 
cuted. The MOVE 65,50 command at line 200 thus becomes very important. Because it 
determines the graphic point’s location when SCALE is executed, it also determines 
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what clipping limits will be implied by the SCALE statement. The SCALE command ex- 
plicitly specifies scale factors and implicitly specifies clipping limits. In contrast, the 
WINDOW command explicitly specifies clipping limits and implicitly specifies scale factors. 
In all the sample runs which use this program {outputs shown below}, the circle drawn by 
lines 1000 through 1060 is always centered in the viewport. This is the case regardless of 
what the viewport has been defined to be. Even though the viewport changes, the circle 

is always the same size and shape. 


13@ DATA 8B, 138, 18,98 
RUN 
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138 DATA 6,138,35,65 
RUN 
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138 DATA 46,84,8,; 188 
RUN 


ie 
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13@ DATA 85,138,65, 188 
RUN 
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To define an object which is part of a picture, RDRAW and RMOVE commands are used 
most often. These commands permit the most flexibility when manipulating the resulting 
image. There are three ways an object or graphic entity is manipulated: changing its posi- 
tion, changing its orientation, and changing its size. If the object is drawn several times, the 
RDRAW and RMOVE commands which define it are placed in a subroutine. The size, 
orientation and location of the object can then be specified before the subroutine is called. 
The following example programs show this process. 


180 INIT 

118 PAGE 

120 DATA 8.130. 8. 180.8, 130.8, 108 
138 READ UL U2 UZ U4 WE WO WS WS a 
148 VIEWPORT UL. 2,U7,04 

158 WINDOW Wi. W2.W3,W4 

i168 SET DEGREES 

178 ROTATE 8 

i889 MOVE 65,58 

i9@ GOSUB 5802 

2@8 MOVE 65.25 

21@ GOSUR S8au 

226 HONE 


238 END 

SOGH REM DRAW TRIANGULAR FIGURE 
S616 RMOVE -10,10 

5428 RDKAW 8.-24 

5038 RDRAW 48,14 

584@ RDRAW -46.19 

5850 RDRAW 38,-12.5 

5068 RETURN 
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Beginning at line 5000 is a subroutine to draw the triangular figure and the extra line it con- 
tains. The MOVE command at statement 170 positions the graphic point in the center of 
the display. Control is passed to the subroutine at line 5000. After the subroutine draws 

the triangle and returns control, the MOVE at statement 190 is executed. This positions the 
graphic point at the lower center of the display. The subroutine at line 5000 is called again, 
drawing another triangle below the first one. In both cases, the location of the graphic point 
when tine 5000 is executed determines where the triangle is drawn on the display. 
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The next example is functionally identical to the previous one except that the lower tri- 


angular figure is rotated. 
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188 
119 
128 
13a 
142 
138 


INIT 

PRGE 

DATA 8.138.0,108,8 
RERD U1.2,U3,U4.W 
UIEWPORT U1,U2,U3,04 

WINDOW WisW2,WS.H4 

SET DEGREES 

ROTATE 8B 

MOUE 65,58 

GUSUB 5806 

MOVE 65,25 

ROTATE 38 

GQOSUB 5088 

HOME 

END 

REM DRAW TRIANGULAR FIGURE 
RMGUE ~16.18 

RDRAW 8.~26 

RDRAW 48,18 

RBDRAW -46.18 

RETURH 
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The next example combines positioning, rotation, and scaling. (The window parameters have 
been restored to their previous values. The horizontal and vertical scaling factors are again 


equal.) 
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INIT 

PAGE 

DATA @.138,8,100 
RESTORE 

READ U1,U2,03,U4 
VIEWPORT Ui,U2,U3.U4 
SET DEGREES 

FOR I=@ TO 90 STEP 15 
WINDOW 6,.110,0.119 
MONE 104+1],15¢I 
ROTATE I[*4 

SCALE 141 °38.1+1 “38 
GOSUB Su6e 

NEXT I 

HOME 


25@ EMD 
5@08 REM DRAW TRIANGULAR FIGURE 


$616 RMOVE -18,18 
56286 RDRAW 8,.-28 
S838 RDRAW 46,18 
5848 RDRAW ~40,18 
5856 RDRAW 38,.-12.5 
5668 RETURN 
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Although both triangles are distorted, the rotated triangle’s shape is completely altered. 
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The example below shows an irregular four sided figure drawn in each of the four quarters 


of the display. 
108 


PAGE 


118 INIT 


128 
138 
148 
198 
168 
178 
i8@ 
138 
208 
218 
2? 


WINDOW 8. 108,6,58 
VIEWPORT 8.6556.59 
GOSUB 1008 

UIEWPORT 65.120,.9; 50 
GOSUB 1688 

VIEWPORT a 58, 188 
GGSUB 198@ 

VIEMPORT 65,138, 58, 108 
GOSUB 1888 

HOME 


8 END 
1860 NOVE 
1818 DRAW 
1928 DRAW 
18238 DRAW 
1846 DRAW 


1 1G Thy es 8 
MOO OY 
Mm & 


& A Gj 4. 
67) 


1958 RETURN 
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The heart of the example is the FOR ... NEXT !oop at statements 170 through 230. The 
WINDOW statement at line 180 restores a known window, ensuring that the MOVE com- 
mand at statement 200 always places the graphic point consistently on the display. It is this 
statement which determines the position of each triangular figure on the display. The 
ROTATE 1*4 command (at statement 200) specifies the orientation of each triangular 
figure. The SCALE 1+1/30,1+1/30 command (at statement 210) determines the size of each 
figure. Because of the MOVE, ROTATE, and SCALE commands, the same subroutine draws 
the triangular figure with seven different locations, orientations and sizes. 


RDRAW and RMOVE do not intrinsically determine the position, orientation or size of the 
image they draw. For that reason, RDRAW and RMOVE are the most convenient graphic 
commands with which to define objects. = 


8 -1 2 Plot 50: Graphic Prog 


PICTURES 


REVERSE VIEWPORT 


In line 150, the first two arguments of the VIEWPORT statement are reversed. In line 170, 
the second two arguments are reversed. In tine 190, both pairs of arguments are reversed. 
The result in each case Is a corresponding reversal of the displayed image. !f the first two 
viewport arguments (which specify the horizontal location of the viewport) are reversed, 
the image is reversed horizontally. If the second two arguments (which specify the vertical 
locations of the viewport) are reversed, the image ts reversed vertically. 


This capability is useful in applications where the GS must draw symmetrical images. 
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The viewport is changed to alter the figure’s position on the display. (This example is very 
different from other examples in this section. The image is drawn solely with absolute 
MOVE and DRAW commands. No RDRAWs and RMOVEs are used at all.) 


The following example is identical to the previous one with three exceptions: the VIEW- 
PORT statements at lines 150, 170, and 190. 
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198 


228 


1866 MOVE 
1818 DRAW 


PAGE 

INIT 

WINDOW 8, 100.0,58 
VIEWPORT 8,65.8,58 
GOSUB 1088 

VIEWPORT 130,65.8,.99 
BOSUB 1888 

UIEWPORT 6,.65,188, 52 
GOSUB 18a¢ 

VIEWPORT 130,65,188.58 
GOSUB 1880 

HOME 

END 


1028 BRAWN 20; 38 


1838 DRAW 
1048 DRA 


16586 RETURN 
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With a Cartesian coordinate system, specifying a point in space requires three coordinate 
values. Specifying a point on a plane, such as the display of the Graphic System, requires 
only two coordinate values. In order to draw three dimensional objects and surfaces on the 
GS, the three-value location for each point in space must be transformed into a two-value 
location on the GS display. In effect, the display serves as the mathematical analog of a pane 
of glass. The object or surface of interest is then examined “through” this viewplane. 


This transformation process is very similar to the one described in Section 4, where applying 
a transform to data was categorized into two fundamental approaches. If the data in its raw 
form is of no interest, it is transformed when it is input and stored in its transformed state. 
In the second approach, the data is stored and edited in the GS in its original incoming state. 
It is transformed to a new state only when it is graphed. 


Three-dimensional transformations fall into the latter category. In several ways, three- 
dimensional transforms are similar to the polar transform in Section 4. Both are applied just 
before the data is graphed. In both transforms, the minimum and maximum of the raw data 
has no direct proportional relationship to the minimum and maximum of the data as dis- 
played on the GS. |n both cases, polar and three-dimensional, the minimum and maximum 
determination for display locations must reflect the transformation being used. Objection- 
able distortion is introduced in both cases if the horizontal and vertical scale factors are 
different. In other words, the aspect ratio of the window must match the aspect ratio of 


the viewport. 
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The three dimensional coordinate system used in each example ts the same. 


+Z 


+X 


The positive X axis extends horizontally to the right of the origin. The positive Z axis ex- 
tends vertically from the origin. The Y axis extends horizontally but ‘‘into” the paper (as 
depicted above). The positive Y axis is, in effect, the depth axis. This is a right-handed co- 
ordinate system. 


Each example program in this section draws the same object, a variation on the unit cube. 
(The unit cube in standard position is a cube with one corner at the origin of the coordinate 
system, the (0,0,0) point. The diagonally opposite corner is at the point {1,1,1) in the co- 
ordinate system. All the edges of the cube are one distance unit in length.) 


In all views shown of this object, the viewer is looking ‘‘down” upon it. It consists of a square 
drawn in the X-Y plane which has an additional line parallel to and 1/2 unit away from the 

Y axis. The four edges of this square are all one distance unit in length. There are four addi- 
tional lines. These form a rectangle which has one corner at the origin or (0,0,0) point, and 
the diagonally opposite corner at the (1,1,7) point. 
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Conceptually, the GS display is a single plane, just as an artist’s canvas or a photographic 
print is a plane. The process of representing a three dimensional object on any plane pre- 
vents true depth information about the object from being presented. This flatness creates 
ambiguities which can make the image on the display confusing. Some kind of stereo im- 
aging device, which presents slightly different images to each eye of the viewer, is the only 
way to accurately convey this depth information. 


\f a three dimensional object is represented by a set of lines, as is usually the case with com- _ 
puter driven displays and plotters, there is another significant limitation. In certain circum- 


stances, showing all the edges of the object introduces confusion. 


What ts the object shown below? 


It could be any of the following: 


Woe 


There have been several algorithms written to remove the hidden lines which make the sketch 

of the cube so confusing. These algorithms all require sufficient topological information about 

the object to determine what lines to hide. While such algorithms are beyond the scope of _ 
this manual, they are discussed in works listed in the Reference Section. 
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Three methods of 3D to 2D transformations are described in this section. In all three 
methods, the structure and statement numbering of the sample programs are very similar. 


100 
CONTROLLING PROGRAM 


780 


4000 THREE DIMENSIONAL ROUTINE INITIALIZATION 


5000 
THREE DIMENSIONAL TRANSFORMATION 


The controlling program begins at statement 100 and never extends beyond statement 780. 

It has the structure shown in the seven step flow chart. The 3D routine initialization segments 
always begin at statement 4000 and never extend beyond statement 4550. The actual trans- 
formation routines always begin at statement 5000 and never extend beyond statement 

5300. The array O always contains the object to be drawn. The array’s size and contents are 
identical in all three examples. 


Since the same object is drawn by each program, the statements which perform the “3D 
data acquisition” and “3D data minimum and maximum determination” functions are 
identical in all three examples. They are listed below. 
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The example programs in this section draw three dimensional objects on the display with 
slightly different methods. However, each program can be separated into the same seven 
steps, shown below: 


1.{3D Data Acquisition 


2.{3D Data Minimum and Maximum Determination 


3.|Select 3D Transform Parameters 


4.| Initialize 3D Routine 


5.[ Find Minimum and Maximum Values of Displayed Locations 


6.| Specify Window Parameters = 


7.| Draw Data ~—S 


—— 


In the flow chart, the seven steps have been separated into four logical sections. Each of the 
three example programs in this part of the manual has the structure depicted above. In addi- 
tion, each example program has another feature. The displayed image is automatically scaled 
and positioned such that it could not be any larger and still fit completely on the display. 
This function is performed by the two steps “find minimum and maximum of displayed 
locations”, and “specify window parameters”, listed above. If this automatic scaling feature 
is inappropriate for a particular application, it is easily removed. 


The steps listed above are appropriately executed in the order shown. Furthermore, the 
paired steps logically go together. The first step in each pair derives or acquires some type 
of data. 


The second step in each pair acts appropriately on that data. Examining the first pair 

of steps (above) provides an example. If the three dimensional data minimums and maxi- 

mums have been determined at some point in the program’s execution, there is no 

need to ever re-determine them unless the three dimensional data changes. Likewise, 

once the three dimensional routine is initialized, there is no need to re-initialize it unless 

there is a change in its parameters. However, if either the three dimensional data or 

the transform parameters change, the previously defined window may become inappro- 

priate. Unless the window is intended to be constant, it should be re-defined. = 
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The individual 3D point to be transformed is passed to the transformation routine {at state- 
ment 5000) in the three-element array P. The 2D values to be displayed are returned to the 
controlling program in variables X and Y. 


The transformation methods are discussed in increasing order of complexity. 


348 DATA 45,0.5,8, 138.8, 188 





OBLIQUE PROJECTION 
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188 INIT 

1218 DEM ECS LCF OGL 1, 3 2eP 6S), AC2.3) 
128 RESTORE 

138 REM KKKAAKAKAAAAKET AKT 

148 REM FILL 30 DATA ARRAY 

158 0=8 

168 DATA 8.5,1,0.5515 
178 READ O¢1,1 OCL, 5, 062.12,5064.29,0¢5,15 
{88 DATA tytyd i 

138 READ 05,2 9066512,068, 39.0095 1) 

286 DATA isietsl 


f 
218 READ 0695234009, 39.0618. 1950618.2) 
228 REN FINO MIN AND MAX OF 3D BATA 
236 Q=-1, ight 
248 DATA 1. 06+300,1.0&+308,1.0E+300 
256 READ atti, GC1029,QC153) 
260 FOR 1=1 TO 18 
278 FOR J=1 TO 3 
288 QC1,J9=QCig J MIN OCT dD 
298 Q¢2,J)=0(2, J) MAX GCI,J> 
388 NEXT J 


NEXT I 
328 REM KXKAKAAATA KAA KAS 


’ 
) 
‘ 
) 


— 


With the exception of the DIM command at statement 110, statements 100 through 320 of 
each example are identical. Statements 100 through 120 perform initialization. Statements 
130 through 210 fill the data array 0. Statements 220 through 310 determine the minimum 
and maximum of the data in each direction. These minimums and maximums are placed in 
array Q arranged as follows: row 1 of OQ holds the minimums, row 2 of OQ holds the maxi- 
mums, column 1 of Q holds the X minimum and maximum, column 2 of QO holds the Y 
minimum and maximum, and column 3 of Q holds the Z minimum and maximum. In the 
three examples, the minimums are all O and the maximums are all! 1. 


ARRAY Q 


COLUMNS 









Z 
MINIMUM 






bd 
MAXIMUM 


Z 
MAXIMUM 





MAXIMUM 


For example, the X maximum is contained in Q {2,1). 
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348 DATA O.8¢7-160,658.5:8,5;,8.8 





PERSPECTIVE PROJECTION 


The oblique transformation routine occupies the smallest amount of memory space, exe- 
cutes the most quickly, and introduces the most visual distortion. The perspective trans- 
formation routine occupies the largest amount of memory space, executes the most slowly, 
and introduces the least distortion. In all three criteria, the orthographic transformation 
routine falls in between the other two. 
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348 DATA 35.2,8,-25 





ORTHOGRAPHIC PROJECTION 
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378 GOSUB 4968 

38Q REM FXXTKKKERAKE KEKE 

398 REM SET UP VIEWPORT AND 2D WINDON 
46@ VIEWPORT 8,1380,0,188 

410 WINDOW Wi, W2,W3,W4 

426 REM XEXXEKAKEKKERKATAKKS 

436 REM MOVE TO FIRST POINT 


448 PCp>s0Ci1.1) 

4$8 Pi2=2061,2) 

468 Pé3)=0(1,3) 

478 GOSUB 5848 

488 MOVE X,Y 

498 REM DRAW OBJECT 

S@Q FOR I*2 TO il 

S18 PCideOCI, ED 

$28 P(2)20C7,.2) 

538 PC3d=0¢1,3> 

54@ GOSUB Seaea 

558 DRAW X,Y 

368 NEXT ! 

578 HOME 

58@ END 

48860 REM FIND SCALING FACTOR 

4810 SET DEGREES 

4828 REM FIND WHETHER HORI2Z OF VERT IS LARGEST SIZE oF INGGE 
4838 REM H=HORIZONTAL IMAGE SIZE, V=VERTICAL IMAGE SIZE 
4848 H=Q(2519-061,194060062,.29-001. 2) 5¥F x005 (0) 
4058 V=0(2, 3-061, 3946062, 29-001, 20 ¥FXSING AD 
$068 IF H’U>1.3 THEN 4186 

4878 REM VERTICAL LARGER 

4890 S=(W4-W3) 7) 

4898 GO TO 4128 

416@ REM HORIZONTAL LARGER 

4118 Sz(W2-W1)-/H 

4128 H=SsFxC0S¢(A)D 

4$3@ V=StFxSINCAD 

4148 RETURN 

3886 REM TRANSFORM FROM DATA X,,;2 TO SCREEN X,¥ 
SO16 XeWieP¢1>%S4+P(2)4H 

5828 Yaeb3+P(3>¥S4P (2980 

5@38 RETURN 


Statements 330 through 370 initialize the projection angle A, the foreshortening factor F 
and the window parameters. The initializing routine starting at statement 4000 computes 
the scale factor for the image. The computation of the scaling factor is based on the as- 
sumption that anything drawn on the display should be as large as possible within the 
specified window. The initialization section determines whether the limiting factor on the 
size of the displayed image is the viewport height or viewport width. The IF command at 
statement 4060 is the decision point. The scale factor is calculated on that basis. The re- 
maining two statements in the section (4120 and 4130) merely calculate constants which 
allow faster execution of the two transformation statements (5010 and 5020). 
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As used here, the term oblique transformation describes a class of transformations commonly 
used in certain technical drawing applications and variously called “oblique”, “‘cabinet’’, and 
“cavalier”. This class might appropriately be called “‘shear” transformations because of the 
distortion they introduce. Lines parallel to the X and Z axes are projected onto the view- 
plane with no distortion. Lines parallel to the Y axis, when projected onto the viewplane, 
become lines drawn at an angle to horizontal in the viewplane. This angle is the projection 
angle, variable A in the program. It is typically not less than 30 degrees and not greater than 
45 degrees. The lengths of lines parallel to the Y axis are multiplied by the foreshortening 
factor prior to being drawn. This foreshortening factor is never greater than 1 and is usually 
not less than %. With a foreshortening factor of %, lines parallel to the Y axis are drawn half 


the length they would be drawn if the foreshortening factor were equal to 1. 


In technical drawing terminology, the cavalier projection has a projection angle of 45 degrees 
and a foreshortening factor of 1, the cabinet projection has a projection angle of 45 degrees 
and a foreshortening factor of %, and the oblique projection has a projection angle of 30 de- 
grees and a foreshortening factor of 1. In this manual, the term oblique is used in a more 
genera! sense. All surfaces of the object which are parallel to the X-Z plane are drawn un- 
distorted. All surfaces of the object parallel to the X-Y and Y-Z planes are distorted in 
varying amounts. This inherent distortion can be reduced for certain applications by 
specifying a projection angle of greater than 45 degrees and a foreshortening factor less 

that 7”. 


The entire oblique program is listed below: 


188 INIT 

118 DOIN ECS LCBO d be Fd PEI. V2] 
126 RESTORE 

L138 REM KAKKKAKRAEAAEKTKKKE 


i480 REM FILL 3D DATA ARRAY 
1Se 0=9 
168 DATA @.5,1.8.5;151 

178 READ OC f,.13,064,29,06€2,12.004,27,065, 1) 

188 BATA tateist 

198 REAP 0¢5,2).0¢66.19.068.3)9,009,.19 

268 DATA loistsil 

219 READ O69,.29,009,3).0018,19,0618,.2) 

226 REM FING MIN AND MAX CF 30 DATA 

236 Q=~1,. 8 +288 

246 DATA 1.6F+300.1,0F+300.1.8E+208 

256 READ OC 1,435,001, 29,001.29 

268 FUR [=1 TO 18 

278 FOR J={ TO 3 

286 OCi.J3=Q001,5)> MIN OCla wD 

298 O62, 5J=QC2, I> MAX OCT, 

386 NEXT J 

318 NEXT I 

326 REM EXHKKKEAAETAEEATE 

336 REM SPECIFY 3D PARAMETERS - PROJ ANGLE AND FORESHORTENING FACTOR 
348 DATA 45,0.5,6,; 136,86, 196 

358 READ AF WisW2,K2,W4 

368 REM INITIALIZE 3D ROUTINE 
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WINDOW PARAMETERS 


As stated previously, the aspect ratio of the viewport must match the aspect ratio of the 
window. This requirement complicates the initialization of the parameters used by the 
WINDOW command in the orthographic and perspective transformations (statements 390 
through 610 in both examples). 


REM SERKREREKAKRKKERE 

REM FIND MIN AND MAX IN VIEWPLANE’S COORDINATE SYSTEM 
DATA 1.8&+300,-1.08+300,1.8&+300,-1.0E+308 

READ Xi,X2, V1, 72 

FOR I=1 TO 2 

FOR J#1 TO 2 

FOR K=1 TO 2 

Pct ysQcI,1) 

P2206 5,2) 

PC3>2QCKs 3) 

GOSUB 3886 

Ri=X1 MIN X& 

R222 MAX X 

Yt=VYi MIN Y 

Y2=Y2 MAK Y 

NEXT kK 

NEXT J 

HEXT I 

REM SET UP VIEWPORT AND 20 WINDOW 

VIEWPORT 6.136,6, 194 

IF (¥2-K197CY2-¥1991.3 THEN 618 

WINDOW (42441340. 5-8, 65K(VY2-¥195 CX24R1 90.548, 65RCV2-V LL 2 
GO TO 638 

WINDOW X1,X25 CYO4V1 9808, 5-(X2-K 192.65 CV 2471 FOL St CR2-K19 22.6 
REM XXKAKKAKKKAAAKEK EEE 
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When using oblique projection, the minimums and maximums in the display’s coordinate 
system do not need to be computed. They are specified in advance. This is the oblique pro- 
jection’s principal advantage over the orthographic and perspective transformations. The 
initialization and transformation statements ensure that no data will be drawn outside the 
specified window. As a result, defining the window requires one WINDOW command and 
nothing else. Of course, the window height and width must have the same ratio as the view- 
port height and width if distortion is to be minimized. 


Statements 430 through 480 transform the first point in array O and position the graphic 
point there with a MOVE command. 


The remainder of the object is drawn with the FOR... NEXT loop at statements 500 
through 560. As with the other examples in this section, the routine required to transform 
three data points into two data points for graphing begins at statement 5000. 
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Orthographic projection has less inherent distortion than oblique projection. In orthographic 
projection, a straight line connecting a point on the object and the projection of this point 
on the viewplane is always perpendicular to the viewplane. 





As a result of this, all lines connecting points on the object to the corresponding points on 
the viewplane are parallel. |n an actual three dimensional situation, this could happen only 
if the observer were an infinite distance away from the object being viewed. Having all the 
lines of projection parallel introduces ambiguities of perspective similar to those which 
occur when viewing an airplane silhouette at great distance. In that situation, it is often easy 
to recognize the silhouette as an airplane but difficult to tell whether it is coming toward 
you or going away. 


—_ 
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Since there is no simple way to determine where on the display the transformed image will 
appear before the three dimensional transformations are initialized, the window minimums 
and maximums must be computed from the three dimensional minimums and maximums 
after the transform is initialized. This is precisely the function performed by lines 390 
through 610. Each corner of the cube created by the three dimensional minimums and maxi- 
mums, a total of eight points in three dimensional space, is transformed into two dimen- 
sional coordinates. The window parameters are then derived from the minimums and maxi- 
mums of these two dimensional values. The parameters are defined (in the two WINDOW 
commands tn statements 590 and 610) such that the image on the display is always centered 
in the viewport. 


The remainder of the main line program (statements 630 through 760) simply moves the 
graphic point to the location of the first transformed point and draws the object. 


BLO REM ERARTAAKKERAA EKER TAKE 
628 REM MOVE TO FIRST POINT 
638 Polye0ch. td 

B38 PC 2>=0¢1,2) 

668 PC3220¢1.3> 

678 GOSUB 5888 

688 MOVE X,Y 

698 REM DRAW OBJECT 

7O@ FOR T=2 TO 11 

rib Pcl FQcI. 1) 

ree Peoasdcly2) 

P73@ PC $3200. 3) 

749 COSUB 5680 
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When rotation angles are specified, they occur relative to this coordinate system which al- 
ways remains fixed, regardless of the specified rotation angles. An example is the case of a 
rotation around the Z axis followed by a rotation around the X axis. Regardless of the ob- 
ject’s orientation after its rotation around the Z axis, the X axis it is then rotated around 
will always be parallel to a horizontal line on the display’s surface, not to the rotated X 
axis of the object's coordinate system. 


For example, the object is rotated 90 degrees around the Z axis followed by 90 degrees 
around the X axis. This produces the image below. 


The object’s X-Y plane becomes parallel to the display’s surface. The visibility of the diag- 
onal line proves this to be the case. If the X axis rotation occurred around the rotated X 
axis, the object’s X-Y plane would become perpendicular to the display’s surface, making 
the diagonal line invisible. 


Of interest is a particular orthographic projection. A rotation around the Z axis of 45 de- 
grees followed by a rotation around the X axis of 35.2 degrees produces an isometric pro- 


jection, common to a variety of drawing applications. 


For reference, a complete listing of the orthographic example ts given below: 
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Listed below are the statements which comprise the heart of the orthographic example. 


328 REM SPECIFY 30 PARAMETERS - THREE ROTATION ANGLES 
348 OATR 35.2.8,25 
{98 READ Als AZAR 


4000 SET DEGREES 

4016 CLr=cCOScrl) 

$928 SI=SINGAL? 

4830 C2=COScA2) 

4848 SS=SINCAZ) 

4858 C3=COScAz) 

$058 S3=SINCH3) 

407d RETURN 

SGG0 REN TRANSFORM Pi td. POZ9,P63) INTO Ag¥ 
SUB HSCLECIEP LL -C2aS SEP C2 4S 2HP C3) 

Bl V=CSUEST-CLFSZHCT IRR CL + CSAC IHCL KS SRST IHR C2 4 LHC ZKP CTS 
3836 RETURN 


The initialization section (beginning at statement 4000) requires three parameters. They are 
rotation angles which specify the object’s orientation when viewed: a rotation angle around 
the X axis (A1), a rotation angle around the Y axis (A2), and a rotation angle around the Z 
axis (A3). The rotation specified is in a consistent direction around each axis. If the thumb 
of the right hand is pointed in the positive direction of the axis to be rotated around, the 
fingers curl in the direction of a positive angular rotation. Inherent in the transformation 
section (beginning at statement 5000) is the order in which the rotations are performed: 
first around the Z axis, then around the Y axis, and finally around the X axis. This ordering 
is fixed in the transformation equations and has an important characteristic: it is not com- 
mutative. A rotation around X followed by a rotation around Y produces a different 
orientation than a rotation around Y followed by arotation around X. The ordering used 
in this example (first Z, then Y, then X) is one of six ways to specify the order in which 

the rotations occur. 


When the orientation angles are all zero, the object's coordinate system is oriented as de- 
scribed earlier in this section. The 3D Z axis is parallel to the display‘s vertical axis (with 
the positive direction being up), the 3D X axis is parallel to the display’s horizontal axis 

{with the positive direction being to the right), and the 3D Y axis is perpendicular to the 
display’s surface (with the positive direction being “into” the display}. 
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678 GOSUB 5ee@ 
686 MOVE X,Y 

696 REM DRAW OBJECT 
706 FOR I=2 TO 11 
71i@ P¢1d=0¢1,1) 
728 P¢2>=0(1,2) 
738 P(3>=0¢1,3) 
748 GOSUB 3882 
708 DRAR X,Y 

768 NEXT I 

776 HOME 

788 END 


4008 SET DEGREES 

4810 CistOS(Al> 

4820 SI=SINCALD 

4836 C2=COS(A2> 

4848 S22SINCA2) 

485@ C3=C0S(A3)> 

4868 S3=SINCAS) 

487@ RETURN 

S888 REM TRANSFORM PC1),P(23,P¢3) INTO X,Y 
JG1G X=C2ECIEPC 1d -C2KSBKP (2 34528P (3) 

S826 Y=CSUKSS-CAKSZEC IEP CLF CSLECI+C LYS SKS 39 4P (25 +C1RC2KP C35 
3838 RETURN 


Listed below are the equations which cause rotation first around the X axis, then around the 
Y axis, then around the Z axis. These can be substituted for similarly numbered statements 
in the listing above. 


3848 REN TRANSFORM Polo, Po25,PC3) INTO X,Y 

SB1G M=CSRCSHP CL ACC BASSES L-SBKCL UEP C254 CC IRS PECL 4S TEC LEP CT 
9820 Y=-S2kPc1 +O 2451 HP 214+ C 2a ypc 3s 

S836 RETURN 
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188 INIT 
118 OFM O¢L1.3).0¢3),0¢2,.73) 
128 RESTORE 
130 REM RXKKKKEKELAAKKKKE 
148 REM FILL 3D DATA ARRAY 
158 0=a 
168 DATA 6.5.1,8.551431 
178 READ O¢1.41)95061.29.06251),064.29, 005.1) 
186 DATA tists 
188 READ 0¢5,.23,0¢66.19,068.3),0¢9, 13 
266 DATA Iststsl 
218 READ 069,253,009. 39, 0816, 19.,001B. 2) 
220 REM FING MIN AND MAK UF 3D GATH 
2360 Q=~-1,.0E+268 
240 DATA 1.96+300.1.66+300,.1.80E+308 
256 READ QeL,13, 061, 29.001,353 
260 FOR I=i TO 18 
78 FOR J=1 TO 3 
288 Q¢41,5).=0¢1.5) MIN OCT, 5D 
296 Q62, J2=Q02], 5) MAS OCT, Jd 
36@ NEXT J 
318 NEXT I 
328 REM XXXKKKKKEKKKAE TET 
338 REM SPECIFY 3D PARAMETERS ~ THREE ROTATION ANGLES 
346 DATA 35.2:8;25 
35@ READ Ai,A2,AZ 
368 REM INITIALIZE 3D ROUTINE 
378 GOSUB 4808 
3BO REM XXEKKEAAKKTKAAKKES 
398 REM FIND MIN AND MAX IN UIEWPLANE’S COORDINATE SYSTEM 
480 DATA 1.8E+380,-1.06+300.1.GE+300,-1.0E+388 
410 READ K1,X2,71,¥%2 
426 FOR l=1 16 2 
439 FOR J=1 TO 2 


448 FOR K=!} TO 2 

4356 Pol eQ¢T. 1) 

468 PC2I=EQC I. 2) 

472 PCS =ARCK,) 

480 GOSUB 52a8a 

498 Nick! MIN X 

$88 X2=X2 MAX X 

918 Yis¥i MIN Y 

328 Y2=Y2 MAX Y 

938 NEXT K 

548 NEXT J 

958 NEXT I 

566 REM SET UP UIEWPORT AND 2B WINDOW 

ord VIEMPORT 8,130.8; 108 

S88 TF CX2-KXto/cY2-Y1)>1.3 THEN 618 

S96 WINDOW (X24X19%8,5-8, 698 C72-V 1", CK2441 9 RO. S4B GSR CV 2-719. Vda V2 
680 GO TO 638 : 
61G WINDOW KisX2e CY ?S4V 1 KB. SH OX S-A 12.60 CV SEY TFB, St CK 2- X12. 6 
628 REM KEXKASTAEK ERA ARKAKTT 

638 REM MOVE TO FIRST POINT 

646 Pfi>=O001, 1d 

656 Pé23=061,2) 

668 P¢3)9=001,.3) 
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S20 REM EREKKARARE AEA ES 

S338 REM SPECIFY 30 PARAMETERS - EYE POSITION & POINT TO BE LOOKED aT 
340 DATA 8.3.-1,0.650.550.5)8.5 

SIO READ ECLIVECS ECT LCL Li ZILeD 

368 REM INITIALIZE 3D ROUTINE 

378 GOSUB 4880 

38G REM EXKKAEECERK EAE ES 


4888 REM SD TO 20 PERSPECTIVE INITIALIZATION 

4810 REM MUST BE RUN BEFORE USING TRANSFORM ROUTINE AT Sued 

48208 REM PURPOSE: 1. FING LOCATION AND ORIENTATION OF GUIEWPLANE 
4036 REN 2. DEFINE 2b COORDINATE SYSTEM OW UTEWPLANE 
4846 REM E IS VIEWER S EYE LOCATION IN 3 SPACE 

4850 REM L 1S 3 SPACE POINT BEING LOUKED AT BY UIEWER’S EVE 

4868 DELETE T1,T2,73.74,TS 

$876 DIM TICS, T2633. T3035 TAC G5, TAC) 

4886 IF EchiasolL did GR Etc2osehi2d THEN 4128 

4098 PRINT “E AND L LIE IN SAME VERTICAL LINE " 

4186 ae "PLERSE CHANGE ONE OF THE FOLLOWING? Ect Et2aghidd OR Leas" 


4120 REM 
4138 T3=E-L 
4i48 REN TZ 1S NOW VECTOR FROM L TOE 


Tru 
4166 FOR T9=i TO 3 
4170 T7aT7+T3c TS t2 
4186 NEXT T9 
4198 T7=SORtT?> 
4260 REM Te Is NOW GISTANCE FROM L TOE 


=T3rT; 
4226 REM T2 CONTAINS DIRECTION COSINES OF NORMAL VECTOR TO VUIEWPLANE 


REM 
4248 REM PLACE VIEWPLANE HALF WAY BETWEEN E AND L 
4250 Té=T?-2 
4260 REM T6é IS DISTANCE FROM E TO VIEWPLANE 


4278 T3*T3¥C(TE-T?? 

4288 T1=E-13 

4298 REN Ti IS THE INTERSECTION OF VIEWFLANE AND LINE FROME TOL 

4308 REM DEFINE Ti TO BE ORIGIN OF UIEWPLANE’S 20 COORDINATE SYSTEM 
M 


4328 aN NOW DEFINE "UP" IN UIEWPLANE’S 2D COORDINATE SYSTEM 


4348 T3(3=T3HC341 

4358 REM 13 IS NOW ENDPOINT OF THE VECTOR (@+O,1) RELATIVE TOL 

4368 REN PROJECT ONTO VIEW PLANE 

4378 GOSUB 5176 

4388 REM T3 IS NOW 3 SPACE POINT DEFINED TO BE "ABQUE” PLANE’S ORIGIN 
4390 REN 

4488 Tr=0 

4416 FOR T9=1 TO 3 

4420 T?=T7#(T3CT9-T1(T3 2 

4438 NEXT 19 

4449 T?=SQR(T?? 

445 REN Tr? IS NOW DISTANCE FROM Ti TG T3 

4460 REM 

4478 T3=13-T1 

4480 15=T3/T? | 

4498 REM TS NOW CONTAINS DIRECTION COSINES OF VIEWPLANE’S "VERTICAL" 
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The only transformation which does not introduce artifical distortion is a true perspective 
transformation. The main line program in the perspective example {statements 100 through 
780) is identical to that of the previous orthographic example. The only exceptions are 
statements 340 and 350, a DATA statement and a READ statement. 


348 DATA @. a 


350 READ EC 1>.E(2) 


These are the parameters used to initialize the transformation. The array E contains the 

location in three dimensional space of the observer's eye. The array L contains the location 

in three dimensional space of the point toward which the eye is looking. This point should = 
be close to the center of the scene being viewed. This will ensure the minimizing of a certain 

type of distortion, the kind seen at the edges of photographs taken with extreme wide 

angle lenses. 


In order to depict scenes in true perspective, a Renaissance artist would observe his sub- 
ject through a pane of glass, marking where the lines between his eye and his subject passed — 
through the pane. 





The algorithm in this example duplicates that process mathematically. 
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5848 REM PROJECT INPUT POINT ONTO UIEWPLANE 
3850 oor 318 


587U nea COMPUTE 2D COORDINATES OF PROJECTED POINT 


Y¥=8 
$i@8 FOR T9=1 TO 3 
SLL K=X+CT3CTSIATICTII ETS CTS 
S128 Yee (T3C TI -TACTSATECTSD 
$138 NEXT TS 
3140 RETURN 
5i5Q REM INTERNAL ROUTINE: FINO 3 SPACE POINT WHERE LINE FROM 
5168 ce T3 TO E INTERSECTS VIEWPLANE 
Si?e Tr= 


T8=8 
5198 FOR T9=i TO 3 
$208 TrsTr+cTicT9s-T3CT9 > eT 26793 
$210 TA=TS+CECTIS-T3CTID ET2CTSS 
5228 NEXT T9 
§236 IF T8>@ THEN 5260 
$240 PRINT "E IS TOG CLOSE TO POINT BEING VIEWED" 


END 
5268 T7=T?-Ts 
5276 FOR T9=i TO 3 
S280 TICT9ISCECTID-T3C TS ET PAT SETS} 
§298 NEXT TS 
5368 RETURN 


The initialization section (statements 4000 through 4550) has one error termination: state- 
ment 4110. The routine must have a direction to call ‘‘up’’. In statement 4340, a line pointing 
up is defined to be parallel to the Z axis, with “up” being the positive Z direction. If the 

line between E and L is parallel to the Z axis, the program cannot define which way is up. 
The IF statement at line 4080 prevents this from happening. 


The transformation section also has one error termination: statement 5250. If a point in the 
object being viewed is at or behind E, the transformation produces inappropriate results. The 
check at statement 5230 prevents this occurrence. 


Both the initialization and transformation sections include REMARK statements which suf- 
ficiently describe the mathematical operations being performed. A background in the ap- 
propriate mathematics wil! permit a complete understanding or the algorithm used in these 
routines. ~ 


Below is a complete listing of the perspective program. To help in understanding the 


algorithm used, an excessive number of REMARK statements have been included. These 
are superfluous and may be removed without affecting program execution. 
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4586 
4518 
4526 
4330 
454 


9388 


@ RE 


REM CROSS PRODUCT WITH UIEWPLANE’S NORMAL VECTOR IS “HORT ZUNTAL" 


T4018 TS C2) 8T20639-T5 C3) kT202) 
14029273639 4T2019-T501947203) 
140327301 4T2025-TS(29kT2C1 5 


M 
RETURN 
REM 


REM ENTRY POINT FOR 3D TO 2D TRANSFORM 

REN P CONTAINS 3 SPACE COORDINATES OF POINT 

Ne TO BE TRANSFORMED TO 2D COORDINATES OF VIEWPLANE 
REM PROJECT INPUT POINT ONTO VIEWPLANE 

oe 9178 


a COMPUTE 2D COORDINATES OF PROJECTED POINT 


Y=@ 
FOR T9=1 TO 3 
K=X+CTSCT9I-TACT9) 4T407T9) 
YEV4CT3CTII-TLCT9) ATSCTSD 
NEXT T3 
RETURN 
REM INTERNAL ROUTINE: FIND 3 SPACE POINT WHERE LINE FROM 
Aue T3 TO E INTERSECTS UIEWPLANE 
{= 
T8=6 
FOR T9=1 TO 3 
Teste TicT9-T3¢T9) 472079) 
T8=T84(ECT9ID“T3CTS) KTZCTSD 
NEAT 19 
IF T8>@ THEN 5268 
io "E IS TOG CLOSE TO POINT BEING VIEWED" 


T72T7-T& 

FOR T9=1 TO 3 
TSCTIIBCECTS9I-T3CT9I ETP 4T SC T9 
NEXT T9 


RETURN 
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700 FOR I=2 19 ti 
716 PC1>=0C1, 1) 
728 PC29=061,23 
738 PC(3>=0¢61,3) 
74@ GOSUB 5888 
750 DRAW XK; 

768 NEXT I! 

776 HOME 

788 EKD 


4008 REM 3D TO 20 PERSPECTIVE INITIALIZATION 

4816 REM MUST BE RUN BEFORE WSING TRANSFORM ROUTINE AT S806 

4828 REM PURPOSE? 1. FING LOCATION ANG ORIENTATION OF UIEWPLANE 
4930 REM 2. DEFINE 2D COORDINATE SYSTEM ON UVIEWPLANE 
4040 REN E IS VIEWER’S EYE LOCATION IN 3 SPACE 

4858 REM L IS 3 SPACE POINT BEING LOOKED AT BY UIEWER’S EYE 

4069 DELETE T1,72,73,74,T5 

4070 DIM T1(3),72¢3),7363), 74039, 7503) 

4880 IF ECLOOLCD OR ECDL (2) THEN 4120 

4898 PRINT "E AND L LIE IN SAME VERTICAL LINE “ 

4180 a "PLEASE CHANGE ONE OF THE FOLLOWING: Ecl>sECZ>sb¢1> OR L¢2>" 


4128 REM 

4130 T3=E-L 

4148 REM 73 1S NOW VECTOR FROM L TOE 
4158 T7=8 

4168 ie T9=1 TO 3 

4178 PET PaTRiTS)t2 

4188 HEXT T9 

4198 T?=SaRiT?> 

4208 REM T? IS NOW DISTANCE FROM L TO € 
4218 Te=T3-T? 

$228 Seu T2 CONTAINS DIRECTION COSINES OF NORMAL VECTOR TO YIEWPLANE 


E 
4246 REM PLACE VIEWPLANE HALF WAY BETWEEN E AND L 
4258 T6=T? 2 
4268 REM Té6 IS DISTANCE FROM E TO VIEWPLANE 
4276 T3=T3k(T6/T?> 
4286 T1I=E-T3 
4296 REM T1 IS THE INTERSECTION OF UIEWPLANE AND LINE FROM E TOL 
4306 REM DEFINE T1 TO BE ORIGIN OF UIEWPLANE’S 20 COORDINATE SYSTEM 


REM 
4326 aay NOW DEFINE “UP" IN UIEWPLANE’S 2D COORDINATE SYSTEM 
4346 13(3)8T3(3)+1 
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INIT 

DIM EC3),L639,0011,39.P 639.0625) 
RESTORE 

REM XERRKTKTAARK ATE 

ca FILL 30 DATA ARRAY 


DATA @.551,0.5, 151 

READ 061513,0¢1,23.062:15,064,2),0¢5,1) 
DATA lsisisl 

READ 06¢9,2),066,13,068, 35.0091) 

DATA Is,istei 

READ 0¢69.2),069,33,06¢618,159,0018.2) 

REM FIND MIN AND MAX GF 3D BATA 
Q=-1.8E+38B 

DATA 1. BVE4+360.1.0E+308,1.8E+388 

READ O¢1,13,Q0C1029,061,23)3 

FOR J=1 TO 18 

FOR J=1 TO 3 

Oct, JOC, 5) MIN OCTe uD 

Be. J =OC2.5> MAK OCT, 3 

NEXT J 

NEXT J 

REM SKERXXKEKEKKEAKKKS 

REM SPECIFY 3D PARAMETERS ~ EYE POSITION & POINT TO BE LOQKED AT 
DATA @.8.71,0.650.5,;8,.5;:9.5 

READ EC 1), EC2),E¢3),L¢019,L629,L¢63) 

REM INITIALIZE 3D ROUTINE 

GOSUB 4808 

REM XSSEKKEAKAATKK TKS 

REM FIND MIN AND MAX IN VJIEWPLANE’S COORDINATE SYSTEM 
DATA 1.0E+306,-1,.4E+366,1.0E+399,-1.GE+390 
READ K1sX2,Yi;¥2 

FOR I=1 TO 2 

FOR Jel 10 2 


FOR Kei TO 2 

PétoeQCI. 1) 

Pi2) 280312) 

PCS ROCK. SD 

GOSUB 3802 

X1#X1 MIN & 

R2=X2 MAX X 

Yi=¥i MIN Y 

Y2=¥2 MAX Y 

NEXT K 

NEXT J 

HEXT ! 

REM SET UP VIEWPORT AND 20 WINDOW 

VIEWPORT @.128,0, 108 

TF CX2-Kbo-cY¥2-Y1301.3 THER 618 

WINDOW CX2¢¢9°48,5-8, 65909 2Z-V¥19. R242 FB. St B. OSV 2-712 
GO TO 638 | 
WINDOW Kia X25 CY24V1 948. 5-CK2-K1 7206 CV SFY DRO. St Ree 81 e206 
REM SHKKEKEXAARE KEES THT 

REM MOVE TO FIRST FOINT 

PCi>=0¢1,1> 

PC23e<0¢1.2) 

PéS1=0¢1,23) 

GOSUB 38ea 

MOVE K;¥ 

REM DRAK OBJECT 
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GLOSSARY 


DEFINITION 


A temporary storage area used for storing a number, summing 
it with another number, and replacing the first number with 
the sum. 


A step-by-step method for solving a given problem. 


A value operated on by a function or a keyword. Also called 
a parameter. 


Operators which describe arithmetic operations, such as +, —, 
ale 

A collection of data items arranged in a meaningful pattern. 

In the Graphic System, arrays may be one or two dimensional; 
that is, organized into rows, or rows and coiumns. 


A name corresponding to a (usually) multi-element collection 
of data items. Array variables may be named with the char- 
acters A through Z and A1 through 29. 


A standardized code of alphanumeric characters, symbols, and 
special ‘‘control’’ characters. ASCII is an acronym for American 
Standard Code for Information Interchange. 


A statement which is used to assign, or give, a value to a 
variable. 


An acronym derived from Beginners All-purpose Symbolic 
Instruction Code. BASIC is a “high level’’ programming 
language because it uses English-like instructions. 


A connected sequence of 1’s and 0’s. 


A Binary digit. A unit of data in the binary numbering 
system; a1 or 0. 

A group of consecutive binary digits operated upon as a unit. 
One ASCII character, for example, is represented by one 
binary byte. 

A connected sequence of ASCII characters, sometimes refer- 
red to as simply “string’’. 

The process of preparing a list of successive computer in- 
structions for solving a specific problem. Coding is usually 
done from a flowchart or algorithm. 


To join together two character strings with the concatenation 
operator (&) forming a larger character string. 


A-1 


THREE DIMENSIONS 


TRUE PERSPECTIVE 


9-26 


REM 13 IS NOW ENDPOINT OF THE VECTOR (0.6.1) RELATIVE TOL 

REM PROJECT ONTO VIEW PLANE 

GOSUB 3178 

aa T3 IS NOW 3 SPACE POINT DEFINED TO BE "ABOVE" PLANES ORIGIN 


T?=@ 
FOR T9=1 TO 3 
T?=T74(T3CT9-T1(T9) 342 
NEXT T9 
T?=SOR(T?) 
RENT? IS NOW DISTANCE FROM T1 TO 13 
M 
13=13-T! 
1521377 
REM TS NOW CONTAINS DIRECTION COSINES UF UIEWPLANE’S "WERTICAL” 
REM CROSS PRODUCT WITH UIEWPLANE S NORMAL VECTOR IS "HORIZONTAL" 
T4C 1) 2TSC294T 2039 -TSC 3 4T 262) 
T4(22T5¢ 3947201 9-TSCL TZ 
T4(33=TS CLINT 22 9-TSCZATZC DD 
REN 74 CONTAINS DIRECTION COSINES OF VIENPLONE’S "HORIZONTAL® 
RETURN 
REM 
REM ENTRY POINT FOR 3D TO 2D TRANSFORM 
REM P CONTAINS 3 SPACE COORDINATES OF PO 
REM TO BE TRANSFORMED TO 2b COORDINATES OF VIEMPLANE 


T3=P 
REM PROJECT INPUT POINT ONTO WIEWPLANE 
GOSUB 5178 


REM 

aps COMPUTE 2D COORDINATES OF PROJECTED POINT 
aA 

Y=8 

FOR T9=1 TO 3 

REX+CT3CTI-TiC TS #T4 (TS) 


YR¥4(T3CT9)-TICTS) TSC TS> 


tf 


NEXT T9 
RETURN 
REM INTERNAL ROUTINE? FIND 3 SPACE POINT WHERE LINE FROM 
ae T3 TO €& INTERSECTS VIEWPLANE 
f= 
T8=Q 
FOR T9=1 TO 3 
TPETPHC TAC TID-T3CTS) akT2act9> 
TSETStCECTII-T3C TSI) KT2CTS) 
NEXT TS 
IF T8>8 THEN 3268 
PRINT "E IS TOO CLOSE TU POINT BEING VIEWED" 
END 
Te=Tr’T8 
FOR T9=1 TO 3 
TICTSIIACECTSI-TSCTS ak Tet Tatas 
NEXT TY 
RETURN 
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Index 


Input 


Instruction 


Integer 


Interrupt 


lterate 


Justify 


Keyboard 
Keyword 


Line Number 


Logic 


Logical Expression 


Logical Operator 


Loop 
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DEFINITION 


A number used to identify the position of a specific quantity 

in an array or string of quantities. That is, in the array A, the 
elements are represented by the variables A(1), A(2}, ... A(50); 
the indexes are 1, 2,... 50. 


Data that is transferred to the Graphic System memory from 
an external source. 


A line number plus a statement (i.e., A line number plus a 
keyword plus any associated parameters). 


A whole number; an anumber without a decimal part. 


To cause an operation to be halted in such a fashion that It 
can be resumed at a later time. 


To repeatedly execute a series of instructions in a loop until 
a condition Is satisfied. 


To align a set of characters to the right or left of a reference 
point. 


The device that encodes data when keys are pressed. 


An alphanumeric code that the Graphics System recognizes 
as a function to be performed. 


An integer establishing the sequence of execution of lines in 
a program. In the Graphic System, line numbers must be in 
the range of 1 through 65,535. 


In the Graphic System, the principle of truth tables, also, the 
interconnection of on-off, true-false elements, etc., for com- 
putational purposes. 


A numeric expression using the logical operators AND, OR, 
and NOT. The numeric expression Is arranged in such a way 
that the numeric result is a logical 1 or a logical 0. A logical 
expression may be part or a larger numeric expression In- 
volving relational operators and/or arithmetic operators. 


Operators which return logical 1’s and 0’s, specifically, the 
AND, OR, and NOT operators. ‘‘True” operations return “1”, 
‘false’ operations return “0”. 


Repeatedly executing a series of statements for a specified 
number of times. Also, a programming technique that causes 
a group of statements to be repeatedly executed. 
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TERM 


Constant 


CRT 


Cursor 


Debug 


Default 


Delimiter 


Dyadic 


Execute 


Expression 


Flowchart 


Function 


Graphic Display Unit 
(GDU) 


Graphics 


Hardware 


DEFINITION 


A number that appears tn its actual numerical form. In the 
following expression, 4 is aconstant: X =4 * P 


An abbreviation for Cathode Ray Tube. In the Graphic System, 
the CRT isa ‘storage’ display, as opposed to a “refreshed”’ 

or TV-like display. 

The flashing rectangular dot matrix on the Graphic System 
display that is located at the position of the ‘‘next’’ character 
to be printed. 


The process of locating and correcting errors in a program; 
also, the process of testing a program to ensure that it oper- 
ates properly. 

The property of a computer that enables it to examine a 
statement requireing parameters, to see if those parameters 
are present; and, finding none, assigning substitute values for 
those parameters. Default actions provide a powerful means 
for saving memory space and time when program statements 
into memory. 


A character that fixes the limits, or bounds, or a string of 
characters. 

Refers to an operator having two operands. 

To perform the operations indicated by a statement or group 
of statements. 


Refers to either numeric expressions or string expressions. 

A collection of variables, constants, and functions connected 
by operators in such a way that the expression as a whole can 
be reduced to a constant. 


A programming tool that provides a graphic representation 
of a routine to solve a specific problem. 


A special purpose operation referring to a set of calculations 
within an expression, as in the sine function, square root 
function, etc. 


An internal unit of measure representing one one-hundredth 
of the vertical axis on the graphic drawing surface. 


Computer output that is composed of lines rather than letters 
numbers, and symbols. 


The physical devices and components of a computer. 
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Peripheral Device 


Program 


Programming 


Relational Operator 


ROM 


Scientific Notation 


Software 


Statement 


String 


String Constant 


String Function 


String Variable 


Plot 50: Graphic Prog 


APPENDIX 


GLOSSARY 


DEFINITIONS 


Various devices (Hard Copy Unit, Plotter, Magnetic Tape 
Drive, etc.) that are used in the Graphic System to input data 
output data, and store data. 


A sequence of instructions for the automatic solution of a 
problem, resulting from a planned approach. 


The process of preparing programs from the standpoint of 
first planning the process from input to output, and then 
entering the code into memory. 


An operator that causes a comparison of two operands and re- 
turns a logical result. Comparisons that are “true” return a 
“1’" comparisons that are “false” return a “O”. The relational 
operators in the Graphic System are =, < >, <<. >. > =, 

and <=. 

Read Only Memory. The ROM is that portion of the system 
memory that can not be changed. The information in the 
ROM can only be read. In the Graphic System, the BASIC 
operating system resides ina ROM. 

A format representing numbers as a fractional part, or man- 
tissa, and a power of 10, or characteristic, as in 1.23E45. 
Prepared programs that simplify computer operations, such 


as mathemetics and statistics software. Software must be re- 
loaded into memory each time the system power is turned on. 


A keyword plus any associated parameters. 

A connected sequence of alphanumeric characters. Often 
called a character string. 

A string of characters of fixed length enclosed in quotation 
marks; also, the contents of a string variable. 


Special purpose functions that manipulate character strings 
and produce string constants. 


A variable that contains only alphanumeric characters, or 
“strings’’. String variables can be represented by the symbols 
A$ through Z$. They have a default fength of 72; i.e., they 
can contain up to 72 characters without being dimensioned 
in a DIM statement. 
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TERM 


Mantissa 


Matrix 


Memory 


Monadic 


Numeric Constant 


Numeric Expression 


Numeric Function 


Numeric Variable 


Operand 


Operator 


Operator 


Output 


Parameter 


DEFINITION 


In scientific notation, the term mantissa refers to that part of 
the number which precedes the exponent. For example, the 
mantissa in the number 1.234E+200 is 1.234. 


A rectangular array of numbers subject to special mathematical 
operations. Also, something having a rectangular arrangement 
of rows and columns. 


This generally refers to the Read/Write Random Access 
Memory that contains BASIC programs and data, as opposed 
to the Read Only Memory which contains the BAISC inter- 
preter. 


Refers to an operator that has only one operand. 


Any real number that is entered as numeric data; also, the 
contents of a numeric variable. 


Any combination of numeric constants, numeric variables, 
array variables, subscripted array variables, numeric functions, 
or string relational comparisons inclosed in parentheses, joined 
together by one or more arithmetic, logical, or relational 
operators in such a way that the expression, as a whole, can 

be reduced to a single numeric constant when evaluated. 


Special purpose mathematical operations which reduce their 
associated parameters (or arguments) to a numeric constant. 


A variable that can contain a single numeric value. Numeric 
variables can be named with the characters A through Z and 
A1 through Z9, and can be used in numeric expressions. 


Any one of the quantities involved in an operation. Operands 
may be numeric expressions or constants. In the numeric ex- 
pression A = B+4*C, the numeric variables B and C, and the 
numeric constant 4 are operands. 


A symbol indicating the operation to be performed on two 
operands. That is, in the expression Z + Y, the plus sign (+) 
is the operator. 


The results obtained from the Graphic System; also, infor- 
mation transferred to a peripheral device. 


A quantity that may be specified as different values; usually 
used in conjunction with BASIC statements. For example, 
in the statement WINDOW —50, 50—100, 100, the para- 
meters are —50, 50, —100, and 100. 
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MESSAGE 
NUMBER ERROR MESSAGE 
1 An arithmetic operation has resulted in an out of range number. 
Example: 
1/1.0E-308 
2 A divide by zero operation has resulted in an out of range number. 
Example: 
4/0 
3 An exponentiation operation has resulted in an Out of range number. 
Example: 
5+1,.0E+300 
4 An exponentiation operation involving the base e has resulted in an 
out of range number. 
Example: 
EXP (1.0E+234) 
2 The parameter of a trigonometric function is too large. That is, the 
variable N in the statement A=SIN(N*2*P1) is greater than 65536. 
Example: 
A=S!N(4.2E+5) when the trigonometric units are set to RADIANS. 
6 An attempt has been made to take the square root of a negative number. 
The positive square root is returned by default. 
Example: 
SOR (—4} 
7 The line number in the program tine is not an integer within the range 
1 to 65535. 
Example: 
@ REM THIS IS AN INVALID LINE NUMBER 
8 The matrix arrays are not conformable in the current math operation. 


That is, they are not of the same dimension and/or do not have the 
Same number of elements. 
Example: 

INET 

DIM A(2},B(2),C(3) 

A=1 

B=2 

C=A+B 
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Subroutine 


Subscripted Array 
Variable 


Substring 


System 


Truncate 


User Data Units 


Variable 


Variable Name 


DEFINITION 


A part of a larger ““main”’ routine, arranged in such a way 

that control is passed from the main routine to the subroutine. 
At the conclusion of the subroutine, control returns to the 
main routine. Control is usually passed to the subroutine 

from more than one place in the main routine. 


An array variable followed by one or two subscripts, as in 
A(9), B3{1,2), and Z(N). The subscripts refer to a specific 
element within the array. 


A portion of a larger string; “BC”, for example, is a substring 
within the string “ABCD”. 


A purposeful collection of interacting components (hardware 
and software) forming an organized whole and performing a 
function beyond the capability of any one component. 


To reduce the number of Jeast significant digits present in a 
number, in contrast to rounding off. For example, the number 
5 is the result of truncating the decimal part of the number 
5.382. 


The units of measure the programmer elects to work with for 
a particular graphing application. These units are estabilished 
in the WINDOW statement as a numeric range for each axis. 
For example the vertical axis range can be set starting at 0 
“dollars’’ and ending at 100 “‘dollars;”’ the horizontal range 
can be set starting at the “year’’ 1962 and ending at the year 
“1975.”" All coordinate values for graphic statements are 
specified in user data units (except VIEWPORT). 


A symbol, corresponding to a location in memory, whose value 
may change as a program executes. 


A name selected by the programmer that represents a specific 
variable. Numeric variables and array variables may be named 
with the characters A through Z and A1 through 29. String 
variables may be named with the characters A$ through Z$. 
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ERROR MESSAGE 


There is an invalid parameter ina GOTO, FOR, or NEXT statement. 
Example: 
500 FOR |=1 to 20 where | has been previously defined as an 
array variable. 


The logical unit number specified in the statement Is not within the 
range 0 through 9. 
Example: 

100 ON EOF (10) THEN 500 


The assignment statement is invalid because of one of the following 
reasons: 
1. An attempt has been made to assign an array to a numeric variable. 
2. Two arrays in the statement are not conformable (not of the same 
dimension and/or do not have the same number of elements). 


3. An attempt has been made to assign a character string to a string 
variable and the character string Is larger than the dimensioned 
size of the variable. 


There is an error in an exponentiation operation because the base Is 
less than O and the exponent is not an integer less than 256. 
Example: 

—107257.5 


An attempt has been made to take the LOG or LGT of a number which 
is equal to or fess than O. 
Example: 

LOG (—1) 


The parameter of the ASN function or the ACS function is not within 
the range —1 to +1. 
Example: 

ASN (2) 


The parameter of the CHR function is not within the range 0 through 127. 


Example: 
A$=CHR(128) 


Not used. 


The parameter is out of the domain of the function. 


Example: 
AS=ST R(X) 
where X has been previously defined as an array variable. 
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MESSAGE 
NUMBER 


9 A previously defined numeric variable can not be dimensioned as an 
array variable without deleting the numeric variable first. 
Example: 
INET 
B=3 
DIM B{2,2) 


ERROR MESSAGE 


10 There is an error in the subscript of a variable due to one of the following 

reasons: 7 
1. A numeric variable can’t be subscripted. 
2. A subscript is out of range. 

Example 1: Example 2: ao 
INIT INIT 
DIM A(2,2) B=3 
A(2,3)=5 PRINT B(4) - 


11 An attempt has been made to use an undefined DEF FN function. 
12 There ts a parameter error in the CALL statement to a ROM pack. ae 


13 A WBYTE parameter is not within the range —255 through +255. 
Example: 
WBYTE 300 


14 A parameter for the APPEND statement is invalid. 
15 An attempt has been made to APPEND to a non-existant!ine number. 


16 There is an invalid parameter in the FUZZ statement. 
Example: FUZZ 0 


17 There is an invalid parameter ina RENUMBER operation due to one of 
the following reasons: 
1. The first or third parameter is not a line number within the range 
1 through 65535. 


2. The increment (second parameter) is not within the range 1 through 
65535 or is so large that out of range line numbers are generated 
during the RENUMBER operation. 


3. Statement replacement or statement interlacing will occur if the 
RENUMBER operation ts attempted. 


This error may occur during an APPEND operation. 


18 Not used. 
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47 


48 


49 


50 


51 


52 
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ERROR MESSAGE 


This operation can not be executed because the Random Access Memory 
is full. Some program lines or variables must be deleted. 


Not used. 


A SIZE interrupt condition has occurred and an ON SIZE THEN 
statement has not been executed in the current BASIC program. 


A PAGE FULL interrupt condition has occurred. 


A peripheral device on the General Purpose Interface Bus Is requesting 
service and an ON SRO THEN statement has not been executed in the 
current BASIC program. 


The EOI signal line on the General Purpose Interface Bus has been acti- 
vated and an ON EOI THEN statement has not been activated in the 
current BASIC program. 


A ROM pack is requesting service and the ON UNIT for external interrupt 
number 1 has not been activated in the current BASIC program. 


A ROM pack is requesting service and the ON UNIT for external interrupt 
number 2 has not been activated in the current BASIC program. 


A ROM pack is requesting service and the ON UNIT for external 
interrupt number 3 has not been activated in the current BASIC program. 


The end of the current file has been reached on an I/O device and an ON 
EOF THEN statement has not been executed in the current BASIC program. 


The statement with the specified line number is too long. This error 
situation occurs if an attempt is made to LIST or SAVE a BASIC pro- 
gram which contains a line with more than 72 characters. Sometimes a 
RENUMBER operation can make a !ine longer than 72 characters. 


The incoming BASIC program contains a line with more than 72 characters. 


The line number specified in this statement cannot be found or is in- 
valid. 
Example: 

GO TO 500 where the line 500 doesn’t exist or PRINT 

USING 100: where line 100 isn’t an {MAGE statement. 


Either the specified magnetic tape file doesn't exist or an attempt has 
just been made to KILL the LAST (dummy) file. 
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MESSAGE 
NUMBER 


29 


30 
31 


32 


33 
34 


35 


36 


37 


38 


ERROR MESSAGE 


The parameter in the VAL function is not a character string containing 
a valid number. 
Example: 

A=VAL("Hi") 


The matrix multiply operation failed because the arrays are not conformable. 


The matrix inversion failed because the determinent was OQ. This error 
is treated as a SIZE error. 


The routine name specified in the CALL statement can not be found. 
Example: 
CALL "FIX IT” where the routine “FIX IT” resides tn a ROM pack 
which is not plugged into the system. 


Not used. 


The DATA statement is invalid because of one of the following reasons: 
1. There isn‘t a DATA statement in the current BASIC program. 


2. There is not enough data in the DATA statement from the present 
position of the pointer to the end of the statement. 


3. An attempt has been made to RESTORE the data statement pointer to 
a nonexistent DATA statement. 


The statements DEF FN, FOR, and ON.. .THEN. .. can not be entered 
without a line number. 


There is an undefined variable in the specified line. A numeric variable 
has not been assigned a value or an array element has not been assigned 
a value. 
Example: 

INIT 

DIM A(2,2) 

A(1,2) =4 

PRINT A 


An extended function ROM (Read Only Memory) is required to perform 
this operation. 


This output operation cannot be executed because the current BASIC pro- 
gram is marked SECRET. 
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ERROR MESSAGE 


An attempt has been made to execute an illegal !/O operation on an in- 
ternal peripheral device. 
Example: 

DRAW @33:50,50 


The diagnostic loader failed. 


An input error or an output error has occured on the General Purpose 
Interface Bus. Both the NDAC and NRFD signal lines are inactive high, 
which is an illegal GPIB state. This usually means that there are no 
peripheral devices connected to the GPIB. 


There is an incomplete literal string specification in the format string. 
Example: 
100 IMAGE 6D,5("“MARK 


A format string is not specified for the PRINT USING operation. 
Example: 

100 IMAGE 6D 

110 PRINT USING 100: 23,24,25 
Line 100 should be: 100 IMAGE 3(6D) 


There is an invalid character in the format string specified in the PRINT 
USING statement. 


Ann modifier in the format string is out of range or is incorrectly used. 
n modifiers must be positive integers within the range 1 through 11 
when used with E field operator and must be within the range 1 through 
255 when used with A,D,L,P,T,X,",(, and / field operators. 


The format string specified in the PRINT USING statement is too long 
(i.e., there are too many data specifiers for the PRINT statement). 
Example: 

100 IMAGE 3{(6D) 

110 PRINT USING 100:A,B 
Line 100 should be: 100 IMAGE 2(6D) 


Parantheses are incorrectly used in the format string which is specified 
in the PRINT USING statement. 
Example: 
100 IMAGE 2{6D 
110 PRINT USING 100:A,B 
Line 100 should be 100 IMAGE 2(6D) 


Piot 50: Graphic Prog A- 1 3 


APPENDIX 


ERROR MESSAGES 


MESSAGE 
NUMBER ERROR MESSAGE 

53 After 10 attempts, the internal magnetic tape unit has been unable to 
read a portion of the current magnetic tape. The tape head has been posi- 
tioned after the bad portion in the file to allow the rest of the file to be 
read. 

54 The end of the magnetic tape medium has been detected. Marking a 
file longer than the remaining portion of the tape can cause this error. 

55 An attempt has been made to incorrectly access a magnetic tape file. 
Example: 

Executing an OLD statement when the tape head is positioned in 
the middle of a data file. 

56 An attempt has been made to send information to a write-protected 
tape. Remove the tape cartridge, rotate the lock-out plug until the black 
arrow points away from SAFE, insert the tape cartridge, and try the 
operation again. 

57 An attempt has been made to read to or write to a non-existent tape cart- 
ridge. Insert a tape cartridge into the tape slot and try the operation 
again. 

58 An attempt has been made to read data which is stored in an invalid 
magnetic tape format. The tape format must be compatible with the 
Graphic System standard. 

59 A program was not found when the OLD statement was executed. 

60 Not used. 

61 An attempt has been made to execute an invalid operation on an open 
magnetic tape file. 

Example: 
Executing a MARK statement with the tape head positioned 
in the middle of an open data file. 

62 There is a Disk File system parameter error. 

63 There is an error in a binary data header, most likely caused by a mach- 
ine malfunction. 

64 The character string is too long to output in binary format. The length 
is limited to 8192 characters. 

65 Not used. 

66 The primary address in the specified line is not within the range 0 


A-12 through 255. 
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ERROR MESSAGE 


A number specified in the PRINT USING statement contains an exponent 
outside the range + 127. 
Example: 

100 IMAGE FD.3D 

110 PRINT USING 100:8.5E+200 


The IMAGE format string was deleted during the PAGE FULL interrupt 
routine. 


A portion of the {MAGE format string was deleted or altered during 
the PAGE FULL interrupt routine. 


A portion of the data specified in the PRINT statement was deleted 
during the PAGE FULL interrupt routine. 


A data item specified in the PRINT USING statement is too large to 
fit into the print field specified in the format string. 
Example: 

100 IMAGE 5A 

110 PRINT USING 100: “HORSE FEATHERS” 
In this example, the string constant "HORSE FEATHERS" is too large 
to fit into the 5 character field which is specified in line 100. 


Not used. 
A ROM pack has Issued an error message. 
Not used. 
Not used. 
Not used. 
Not used, 
Not used. 


An internal conversion error has occurred because a parameter in the 
specified statement is negative. 


An internal conversion error has occurred because a parameter in the 
specified statement is greater than 65535. 
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MESSAGE 
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77 


78 


79 


80 


81 


82 


ERROR MESSAGE 


There is an invalid modifier to a field operator in the format string which 
is specified in the PRINT USING statement. 
Example: 
100 IMAGE 2(6D),2S 
110 PRINT USING 100:A,B 
Line 100 should be: 100 IMAGE 2(6D),S 
An n modifier is not allowed 


An S modifier is incorrectly positioned in the format string which ts 
specified in the PRINT USING statement. The S modifier must always 
be positioned at the end of the format string. 
Example: 

100 IMAGE 4D,S,8A 
Line 100 should be: 100 IMAGE 4D,8A,S 
A comma is incorrectly used in the format string which is specified in 
the PRINT USING statement. 
Example: 

100 IMAGE 6,D,S 
Line 100 should be: 100 IMAGE 6D,5 
A decimal point is incorrectly used in the format string which Is specified 
in the PRINT USING statement. 
Example: 

100 IMAGE .3D 

110 PRINT USING 100:812.345 
Line 100 should be: 100 IMAGE FD.3D 


A data type mismatch has occurred in the PRINT USING statement. 
Example: 

100 IMAGE 6D,6A 

110 PRINT USING 100: “MARY” 26 
Line 100 should be: 100 IMAGE 6A,6D 


A tabbing error has occurred in the format string which is specified tn 
the PRINT USING statement. 
Example: 

100 IMAGE 10A,2T,FD 

110 PRINT USING 100: “ENTER DATA”,D 
The absolute tab to position 2 specified by 2T in line 100 cannot occur 
because the cursor has already advanced beyond position 2. The tab 
specification must be at least 11T in this case. 
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Graphic information is sent to any graphic device as GDU's expressed in the form of ASCI| 
characters. An important point is that the DRAW command outputs graphic information 
in the same fundamental form that the PRINT command outputs ASCII characters. It is 
useful to compare the DRAW command with the PRINT command. They are listed below 
with their default primary and secondary addresses: 


PRINT @32,12; DRAW @32,20: 


Both commands output ASCII characters. They both send this ASCII information to the 
display (primary address 32). There are, however, two fundamental differences: what Is 

done to the information before it is sent out (determined by the keyword) and what the 
display does with the information when received (determined by the secondary address). 


The secondary address 12 tells the display to print the characters which are equivalent to 
the ASCII characters it receives. The secondary address 20 tells the display to draw a line 
from wherever the graphic point is currently jocated to a location on the display specified 
(in GDU's) by the ASCII characters received. 


Enter the following into the Graphic System: 
PRINT @32,12: 65,50 


This command instructs the Graphic System to output the ASCII characters 6 5 and 5 QO. 
The primary address of 32 means that characters are sent to the display. The secondary 
address of 12 instructs the display to print the characters as received. Now enter the following 
command: 


PRINT @32, 20: 65,50 


This command causes a line to be drawn to the center of the display. The only difference 
between the two commands is the secondary address. Both commands send the same ASCII 
characters to the display. However, the same characters are interpreted differently because 
of the different secondary address. 


Now enter the following commands into the Graphic System: 


INIT 
WINDOW —50,50,—50,50 
DRAW @32,20: 0,0 


The DRAW command causes a line to be drawn to the origin of the user data space defined 
by the WINDOW command. The INIT and WINDOW commands (above) defined the user 
data space such that the center of the display corresponds to the location (0,0) in that data 
space. Therefore, a DRAW 0,0 in this context really is saying “‘draw a line to the center of 
the display’. The center of the display is the location 65,50 in GDU’s. So the DRAW com- 
mand must convert user data units into GDU’s prior to outputting the graphic information. 
A secondary address of 20 specifies that the ASCI| information received is to be interpreted 
by the display as graphic information. 
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The Graphic System can be considered to be a ‘central processing unit'’ which communi- 
cates to various peripheral devices, some of which are internal and some of which are ex- 
ternal. Internal peripheral devices are the keyboard, the tape, the display, and the General 
Purpose Interface Bus. External peripherals are those connected to the Graphic System via 
the GPIB. The Graphic System is very consistent when ASCII information is sent to or re- 
ceived from any peripheral. Implicit in each Graphic System output command (such as 
PRINT) are three functions: 


Any conversion to be performed on the stored data prior to its output. 
Specifying which peripheral is to receive the data. 
Specifying the function to be performed by the peripheral. 


The PRINT command is an example. 


Any data sent to a peripheral via the PRINT command must be converted from internal 
storage form to ASCII characters. The command itself can be used in three forms: 


PRINT 
PRINT @P: 
PRINT @P,S: 


The P in the above forms is the primary address. This number determines which peripheral 
device will receive the data. 


When no primary address is specified (as in the first form of PRINT, above), the PRINT 
command itself specifies a default primary address of 32, signifying the display. When no 
primary address is specified, PRINT sends data to the display. 


The S in the above form is the secondary address. This tells the peripheral what type of data 
to expect and what to do with it. The default secondary address for PRINT is 12, which tells 
the display that it will receive ASCII characters and that these characters are to be printed 
on the display in their ASCII form. 


Another ASCI} output command is DRAW, which performs the same three types of func- 
tions as PRINT: 


Convert data from internal to external form. 
Determine device if no primary address is specified. 


Determine device function if no secondary address is specified. 
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The above program demonstrates that there are three fundamental ways to draw a line on 
the Graphic System display: RDRAW (statement 340), DRAW (statement 370) and PRINT 
(statement 390). The program also shows that each of these three commands requires dif- 
fering amounts of time to draw a series of lines. The PRINT command is the fastest be- 
cause its only function is to output ASCII characters. The additional functions performed 
by the DRAW command slow its execution. Whenever graphic information its output with 
the DRAW command, two additional functions must be performed: clipping and trans- 
formation from user data units to GDU's. RD RAW is slower still because it performs two 
more functions: rotation and computing absolute coordinates. (Only absolute graphic infor- 
mation is output. All relative calculations are completed inside the Graphic System prior 

to output.) 


The above example program also demonstrates that PRINT handles arrays differently from 
DRAW and RDRAW. PRINT outputs data from an array in simple sequential order. The 
secondary address of 20 instructs the display to interpret the first ASCI] number received 
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lf a DRAW command with a secondary address which is not 20 is executed, the display 
will interpret the information it receives differently. 


Now enter the following command into the Graphic System: 
DRAW @32,12: 0,0 


As shown above, a secondary address of 12 instructs the display to interpret the infor- 
mation it receives only as ASCII characters, not as graphic information. When the command 
DRAW @32,12: 0,0 is executed, the numbers 65 and 50 are printed on the display. This 
shows that the user data space location of (0,0) has been transformed into the display 
location of (65,50). 


The above commands demonstrate two principles. One: that graphics are really device 
independent mathematics until the information is sent to a graphic device. Two: graphic 
commands perform several operations on graphic data before it is output. The example 
below shows that these operations require varying amounts of time to perform. {When run, 
the program below calculates for several seconds before any output ts displayed. After the 
program has been run once, pressing user definable key one causes the output to be re- 
peated without re-performing the calculations.) Enter the following statements into the 
Graphic System: 


i GO TO 188 

4 GO TO 318 

198 N=180 

119 D=1@8@-N 

120 DELETE AyByX,¥s2 

138 DIN ACN) sBCND XCM) YCND SUN, 2D 

148 SET DEGREES 

13@ FOR I=zi TON 

168 XC Id=1kD 

178 VCD SSINC T&D) +1 
NEXT I 


198 a=D 

268 BCL AVC 15-1 

218 FOR I*2 TON 

228 BCI>«¥C1LI-¥CI-1>3 
238 HEXT I 

248 D1=1398-N 

258 FOR f#i TOW 

268 2¢1, 1 21801 

278 261, 2.27 C1) ¥18 
288 NEXT I 

23@ PAGE 

388 PRINT “G" 

318 VIEWPORT 6,138,860, 188 
320 WINDOW &, 1886,9,2 
338 MOVE 6,1 

348 RDRAW A,B 

338 UIENPORT 6, 1380,48,68 
368 MOVE @,1 

378 DRAW X,Y 

38@ PRINT #32,21:8,18 
398 PRINT #32,28:2 
408 END 
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The WINDOW and VIEWPORT commands determine how user data units are transformed 
to GDU’s. This transformation process is entirely internal to the Graphic System and Is 
totally independent of any graphic device, including the Graphic System display. Within 

the numeric limits of the Graphic System, any window can be transformed into any view- 
port. A command such as VIEWPORT 500,1000,200,400 will define a conceptually valid 
transformation which is used by the Graphic System. However, no graphic information wiil 
ever reach the display because all graphic information would be transformed into locations 
outside the 130 by 100 GDU timits of the Graphic System display. This condition is known 
as scissoring. It occurs when the graphic device hardware attempts to execute an action it 

is not capable of performing, such as moving the graphic point to the position 500,200 in 
GDU’s. Scissoring usually reflects some kind of user error. What action actually results when 
scissoring occurs is determined by the hardware of the particular graphic device. Since 
graphic devices have different hardware configurations, scissoring produces different actions 
in different devices. When commanded to perform an action it is not capable of performing, 
the Graphic System display does nothing: the physical graphic point does not move. 


Scissoring is very different from clipping, a needed function performed by the Graphic 
System before the graphic information is output to the graphic device. Clipping permits 
drawing to and from points located anywhere in user data space, even those which are out- 
side the defined window. 


Scissoring occurs when two types of errors have been made: when an improper viewport 
has been defined (e.g., VIEWPORT 300,500,200,400), and when the display is directly 
instructed to place the graphic point outside its GDU limits with a PRINT command 
(e.g., PRINT @32,20: 200,200). 
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as a horizontal location in GDU’s, the second ASCI/ number received as a corresponding 
vertical location in GDU’s, the third number received as a new horizontal location, andso 
forth. When outputting data from arrays, DRAW and RDRAW require two data arrays. In 
the above example program, examine the DRAW command at statement 370. The location 
of the first displayed point is specified by X(1) and Y(1). The second point’s location is 
specified by X(2) and Y(2). 


The graphic commands DRAW, MOVE, and GIN each have a counterpart which addresses 
an actual display location. 


These counterparts are listed in the following table: 


Arguments interpreted Arguments interpreted 
as User Data Units as GDU’s 

DRAW X,Y PRINT @32,20: A,B 
MOVE X,Y PRINT @32,21: A,B 
GIN X,Y INPUT @32,24: A,B 


For example, the execution of the statement PRINT @32,20: 65,50 always draws a line 

to the center of the screen regardiess of the parameters of the WINDOW, VIEWPORT, and 
SCALE statements, and the present position of the graphic point. This command will draw 
a line to a point which is outside a specified window and viewport; the clipping and trans- 
formation done to lines produced by the DRAW command is not done to tines produced by 
the PRINT command. PRINT @32,21: A,B causes the graphic point to be moved to a point 
on the display specified by the contents of variables A and B. INPUT @32,24: A,B causes 
the actual location of the graphic point in GDU’‘s to be placed in variables A and B. (This 
command and the GIN statement are two commands useful for determining where the 
graphic point is at a given time.) With all three of these statements, the first argument (called 
A in the above examples) is interpreted to be the horizontal location in GDU’s, and the 
second argument (called B in the above examples) is interpreted to be the vertical !ocation 
in GDU’s. 


There are no statements corresponding to RMOVE and RDRAW which operate in GDU’s 
only. 


since graphic information is sent to any graphic device in the maximum precision of which 
the Graphic System is capable, the displayed resolution is determined by the graphic device 
hardware, not by the Graphic System. The number of addressable points on the Graphic 
system display is 1024 (horizontal) by 780 (vertical). Therefore, the display’s resolution 

is approximately 1/8 or .125 GDU. With 3000 by 2000 addressable points, the 4662 
plotter is significantly more precise. Its resolution is approximately .05 GDU. 
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* The execution of a MOVE command to a point whose transformed location is outside 


the GDU limits of the graphic device being addressed. In the case of the Graphic System 
display, this situation is produced by the following commands: 


| 


Logical 
Graphic 
Point 


INIT 
MOVE 200,200 






Physical 
Graphic 
Point 


When these commands are executed, the physical graphic point does not move at all, even 
though the logical graphic point is located correctly. As with the situation produced by a 
DRAW command described above, subsequent graphic command are executed properly 
but the GIN command will reflect the location of the physical graphic point, instead of the 
logical graphic point. 


There are several ways to ensure that the physical and logical graphic points coincide. 
Here is one: 


250 GIN A,B 
260 MOVE A,B 


The values returned by the GIN command show the location in user data space which 
coincides with the location of the physical graphic point. A MOVE to that point updates 
the location of the logical graphic point so that the two points coincide. This is useful when 
graphic and non-graphic information is mixed, as shown below: 


310 GIN A,B 


320 PRINT “HELLO”: 
330 MOVE AB 
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Throughout this manual, the words ‘‘cursor’’ and “‘graphic point’’ have been used almost 
interchangably to specify a location on the display. There are situations where they do 
not represent the same location. It is sometimes necessary to distinguish between the 
location of the physical graphic point on the display and the location of the graphic 
point in user data space. When a program is not running, the location of the physical 
graphic point on the display is shown by the position of the blinking rectangular dot 
matrix. This is always the starting point for character information printed on the display. 
In the vast majority of instances, this is also the starting point for any lines drawn on 

the display. 


The location of the graphic point in user data space is called the logical graphic point in 

this appendix. The position of the logical graphic point is affected only by graphic commands, 
such as MOVE and DRAW, not by other output commands such as PRINT. Whenever 
WINDOW, VIEWPORT, or SCALE are executed, the physical graphic point is not moved 

but the location of the logical graphic point {in user data space) is changed so that the two 
locations coincide. The physical and logical graphic points will not coincide after any of 

the following events occur: 


* The execution of any non-graphic command which moves the physical graphic point on 
the display. PRINT is such a command. It changes the actual location of the graphic 
point without changing the location of the logical graphic point in user data space. 


* The execution of a DRAW command to a point outside the defined window. Although 
the location of the logical graphic point is updated correctly, the physical graphic point 
is placed at the intersection of the drawn line and the defined window boundary. 


Logical 
Graphic 
Point 


Physical 
Graphic 
Point 


All subsequent graphic commands are executed properly. However, the values returned by 
GIN will reflect the location (in user data space} which coincides with the physical graphic 
point, not the logical graphic point. 
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Many Graphic System users may already be familiar with the Terminal Control System 
software of Tektronix. Listed below are TCS subroutines which are similar to Graphic 


system graphic commands: 


TCS 


DRAWA 
DRAWR 
DRWABS 
DWINDO 
HOME 
MOVE A 
MOVER 
MOVABS 
NEWPAG 
RROTAT 
SEELOC 
TWINDO 
VCURSR 


GRAPHIC SYSTEM 


DRAW 
RDRAW 
PRINT @32,20: 
WINDOW 
HOME 

MOVE 

RMOVE 
PRINT @32,21: 
PAGE 
ROTATE 
INPUT @32,24: 
VIEWPORT 
POINTER 


No TCS subroutines are equivalent to the Graphic System commands GIN and SCALE. The 
RSCALE subroutine in TCS applies only to relative vectors while the SCALE command of 
the Graphic System applies to both absolute and relative lines. The TCS common vari- 

ables TREALX and TREALY contain the same type of values which GIN places in its 
target variables: the location of the virtual cursor (or logical graphic point) in user data 
space. The Graphic System command AXIS has no TCS equivalent. 


Plot 50: Graphic Prog REV 


. A, APR. 1976 


A-25 


APPENDIX 


GRAPHIC POINT CONTROL 


Here is another method: 


320 PRINT “HELLO” 
330 RMOVE QO, O 


The RMOVE command at line 330 (above) will cause the physical and logical graphic 
points to coincide whenever the logical graphic point is inside the physical limits of the 
graphic device. This is another way to approach the problem solved on page 1-57. 
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ASCII CODE 


During string comparisons, lower case characters (gray tint) are converted to their upper case equivalents. 


FUNCTIONAL NAMES OF THE FIRST 33 ASCII CHARACTERS 


O = (Null} 10 ~={Line Feed) 21 (Negative Acknowledge) 
1 (Start of Heading) 11. {Vertical Tab) 22 (Synchronous Idle} 
2 (Start of Text) 12 (Form Feed) 23 (End of Transmission Block) 
3. {End of Text) 13 (Carriage Return) 24 (Cancel) 
4 = (End of Transmission) 14 (Shift Out) 25 (End of Medium) 
5 (Enquiry, also known as 15 = (Shift In} 26 (Substitute) 
Who-Are-You) 16 (Data Link Escape) 2/ (Escape) 
6 (Acknowledge) 17. (Device Control 1) 28 {File Separator) 
7 ~~ {Bell) 18 (Device Control 2) 29 (Group Separator) 
8  (Backspace} 19 (Device Control 3} 30 = =(Record Separator) 
9 (Horizontal Tab) 20 = (Device Control 4) 31 (Unit Separator) 
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Listed here are some materials which discuss computer graphics in general. Since much more 
has been published regarding specific topics in computer graphics, this is only a tiny fraction 
of the available literature. 


BOOKS: 


Newman, W. and Sproull, R., Principles of interactive Computer Graphics, McGraw-Hill, 
NewYork, 1973. (Text book with detailed discussions of hardware, software, algorithms, 
data structures, and other topics. Includes large bibliography.) 


Nelson, T. H., Computer Lib/Dream Machines, $7 from Hugo's Book Service, Box 2622, 
Chicago, III. 60690. (informal introduction to computers in general. Also discusses com- 
puter graphics and other computer related topics.) 


PERIODICALS: 


Computer Graphics available from ACM-SIGGRAPH 1133 Avenue of the Americas, New 
York, New York 10036. SIGGRAPH is the special interest group for computer graphics, 
part of the Association for Computing Machinery. The Spring 1975 issue of Computer 
Graphics (Vol. 9 No. 1) is The Proceedings of The Second Annual Conference on Computer 
Graphics and Interactive Techniques. 


ACM Computing Surveys Vol. 6, No. 1 (March 1974). ACM 1133 Avenue of the Americas, 
New York, New York 10036. This issue has two articles: ''A Characterization of Ten Hidden 
Surface Algorithms” and ‘Computer Processing of Line Drawn Images”. 


Praceedings of The [EEE (April 1974). Institute of Electrical and Electronic Engineers, 
347 East 47 Street, New York, New York 10017. Special issue on Computer Graphics. 


ARTICLES OF GENERAL INTEREST: 
Sutherland, |. E., “Computer Displays”, Scientific American, June 1970, pp. 57-81. 


CONFERENCE PROCEEDINGS: 


Significant papers about computer graphics appear in proceedings from the National 
Computer Conference, The Fall Joint Computer Conference, and The Spring Joint 
Computer Conference. Available from: 


AFIPS Press 
210 Summit Avenue 
Montvale, New Jersey 07645 
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